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A NEW, IMPROVED 

ZX81 KEYBOARD AT THE SAME 

OLD PRICE.£9.95. 






There's only one thing wrong with the 
ZX81. Its keyboard. 

Or rather its lack of one. 

Since rfs flat your fingers don't feel as if 
there's any response to the pressure put on 
the keys. 

i \ 

ZX81 KEYS FILESIXTY KEYS 

In other words, you're not quite sure 
which keys you've pressed until the screen 
actually tells you. 

Our new, improved push button keyboard 
changes all that 

It matches the ZX81 perfectly And the 
keys give a real calculator-type feel. 

To set it up all you have to do is peel off the 
adhesive backing and stick it on top of the 
ZXSltouchpad. 

Because no tampering or soldering is ^===^j 

involved the guarantee is not affected. And it k-^- i H_ Iff J^fc 5 A. I T 
will last for up to 3V? million operations. Lr — f_T^ ^^Jr^_ "_z. _I_ _T. 

Filesixty Ltd.. 25 Chippenham Mews, London W9 2AN : England. Tel: 01-289 3059. Telex: 268 048 EXTLDN G 4087. 



But our keyboard doesn't just come 
loaded with features. With it comes a separate 
overlay and a set of coloured stick- on labels to 
make game playing easier. 

Its yours for the original price of £9.95. 

Whichever way you look at it, we think 
you'll agree that its a keyboard that's quite 
outstanding. 

I Orders to Filesixty Ltd., FREEPOST, London W9 28^ 
Cheques/PO made payable to Filesixty Ltd. 
Please send me (qty) Keyboards at £9.95 each 
(including VAT and P&P). 
Total £ 



WELCOME 



welcome 



ik * 1 : LET 



BEEP alarm, clock 

PRINT"'Time to get up!" 

GO SUB bathroom 

LET action - dress 

GO TO kitchen 

INPUT breakfast 

GO TO work 

LET action =work 

IF time <1 200 THEN GO TO 80 

GO SU8 wine-bar 

INPUT food + drink 

IFcash>0 THEN LET drin 

cash = cash-1:GOTO 1 10 

RETURN 

IF drink >4 THEN GO SUB bathroom: LET 

drink = drmk-1: IF drink 6 THEN CRASH 

IF drink < 3 THEN LET actions work 

IFtime<1700 THEN GO TO 130 

PRINT "Hello dear" 

INPUT supper 

LET action - TV 

IF time<2300 THEN GO TO 1 70 

GO SUB bathroom 

GO TO bed 

PRINT 'I've a headache" 

LET action * sleep 



V subject. BUT now that l'\ 
N tremendously versatile it 



dump is particular/ valuafc 
Spectrum programs, it is 



Fulfilling 
obligations 



number of letters complaining 
about mistakes in listings 
published in ZX Computing, ft is 

this situation by using a different 
printer to LLIST. Of course, you 
will get complaints thai the 
graphics in the listings are con- 
fusing as they appear as letters 



l.n't it ,m,!ina h°» ram- 


only 1 0% of the population are 


good hands. 


start of the program showing 
the way that graphics will ap- 


1 decided to go to the local to 


raised. Perhaps the space in- 


Contributions 


pear, l would have thought that 
this would have satisfied even 


get away 'torn computing for a 






readers. Having said this, and 


















family usually was (including the 














Computing get tapes and 








listirujs of programs, programs 






magazine you think you can 


are still published which fail to 


On entering the "Merry 


Back to school 




run correctly. Whilst it's a real 












Recently I was privileged to at- 




cure 'bugs' in a program which 




tend a teachers' course in Exeter 












pretty annoying to find out that 


sion ending back on micros. Try 




petitive rates. So if you've got 


whole lines have been left out. 


again. 




your eye on a new ZX add-on or 


Surely someone tries these 


A quick play on the fruit 




you'd just like to supplement 


listings to make sure they work 




and Avon Special Education 




before they are published? Your 


sound of zips and laps from the 


Microelectronics Resource Cen- 


It is vital, though, that all the pro- 






tre. Both the organisers and the 


grams you send us are totally 
















'adapted' from other magazines 








or books. (When Tim Hartnell 






teaching. Each of us worked 


was sitting in the Editor's chair, 


reasonable expectation. 




from 9.00am to 9 00pm atten- 


he even received 'original' con- 




the local school, they are dis- 


ding demonstrations and lec- 


tributions hehimself had written 




pros and educational software. 


the early hours trying out what 


Any kind of program 


nore that they have legal obliga- 






(business, domestic, educa- 


mistakes happen, and I note that 


bunch of local sportspeople, its 


The outstanding feature of 




you are prettv good at ZX Com- 






welcomed which use ZX BASIC 






had been devised to allow 






racing and other non computer 










needs tc- programmers, a 




number of paperbacks on the 


It took less than a micro- 


system of 'specifying' their 


on other programs. 


market that do not. The 


second before the conversation 




Program listings are vital. 


publishers of these books 










forecasting programs and com- 






The odd addage "caveat emp- 




mal training at all. My particular 






Give up. go for a long walk. 


likes happen to be machine effi- 






go home. Its hard to believe that 


cient programs - much along 


the program is RUN (a screen 


Description. 
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Spectrum?" needs 3 
tack IDec/Jan 84) Is 



i that the IN func 
and others which 



ised to fly 

: suggested 



The Spectrum is an exci 
little machine for trie mone 
unbeatable value. A lot of pi 



IN 


65273=191 


IN 


650&a=191 


IN 


04510=151 


IN 


634e.5 = 15I. 


IN 


61435=191 


IN 


573*2=191 


IN 


49153=191 


IN 


32765=191 


NO 


Of Ch? ' * * = 1B0 


The 


ecoml trill - sen FvMJHmg Obligations 






h section. Stupid proi 

ising keys, no change si" 
observed. Not so . . . 
i from this program she 
: when the Spectrum he 



70-80% I 



s are anything to go b^ 
e cajoled into revealin 



changed. Still Sinclair have not 

statement of how the ULA 
affects the operation of the 
Spectrum, and, more important. 



LA is unstable in it 



Sinclair 


1%,* 


a wi b ,r, 


Best regar 
Dane Lav 


rv 




PS. For th 


aeof 


swhom 






V.I, 


provided a fine enab 


ing nev 


issue, It wouldn't take up 


IN 


65273=131 


ttIN 


32766 


191=7 


IN 


55032=191 


a IN 


49150 


191=68 


EN 


84.510=255 


ttIN 


57342 


131=5 


IN 


63486=191 


a IN 


61438 


i9i=ia 


IN 


614-36 = 191 


BIN 


63438 


191=8 


IN 


67342=191 


aifi 


645 lO 


191=69 


IN 


49150=255 


ttIN 


65022 


191=3 


IN 


33766=191 


KIN 


6S273 


191=3 


NO 


of ch e c t » ■ 


100 






ffl* 


Its! trial - see Fulfilling Obllqatio 


- 





0>REM "DETECT" Dane Lavery 
1983 

10 LET x=0: LET y=0: LET z=0: 
LET p=0: LET q=0: LET r=0: LET s 
=0: LET t=0: LET d=0: LET g=0 
95 FDR n=0 TO 7 

LET A=65534-(256*2"n) 
LET B=IN A 
GD SUB 3000 

IF B>191 THEN GD TO 142 
IF B<=191 THEN GO TD 14S 
GO SUB 1000 

IF n=7 THEN GO TD 4000 
146 IF A=32766 THEN GD SUB 200 

150 PAUSE 5: NEXT n 

1000 IF A=65278 THEN 

1001 IF A=65022 THEN 

1002 IF A=64510 THEN 

1003 IF A=634Be THEN 
1010 IF A=61438 THEN 
1BJ1 IF A=57342 THEN 
1012 IF A=49150 THEN 
1020 IF A=32766 THEN 
1030 LET sax+li PRINT AT 2 
IN 32766>191="jx; RETURN 
1040 LET y=y+l: PRINT AT 4 
IN 49150>19i=";y: RETURN 
1050 LET -=2+1: PRINT AT 6 
IN 57342M?I = "i2: RETURN 
1060 LET p=p+l: FRINT AT B 
IN 61438>I9I=";p: RETURN 
1070 LET q = q + 
€IN 63486>191: 
I0B0 LET r=r+ 
£IN 64510>19r 
1090 LET s=s+ 
CIN 65022M91 
1100 LET t=t + 
£IN 6527BM9L 



GO 


TD 


95 


GO 


rr,i 


1100 


GO 


TO 


1090 


GO 


ro 


10B0 


GO 


TO 


1070 


uu 


TO 


1060 


GU 


TO 


1050 



GO TO 1030 



q: RETURN 
PRINT AT 12 
r: RETURN 
PRINT AT 14 
s: RETURN 
FRINT AT 16 
t: RETURN 



2000 FDR . 



=0 TO 17 
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2010 


PRINT AT m,0; " 


2015 


NEXT m 


2030 


RETURN 


3000 


LET g=g+2 


3020 


PRINT AT g,0;"IN "jAj"=";B 


3030 


IF g=16 THEN LET g=0 


3040 


RETURN 


4000 


LET d=d+l 


4005 


IF d = 101 THEN CDPV : GO TO 


6000 


4006 
4010 


PRINT AT 19,0; "No of Checks 


GD TO 146 


6000 


CLS : INK Is PAPER 7: BRIGH 


T 1: 


FLASH Is PRINT AT 10,0s "Do 


you » 


ish to run check ag«i n?" 


60119 


INK 2: PRINT AT 12,12; "(y o 


r n? 




6020 


INPUT a*! INK 0s PAPER 7: B 


RIGHT 0: FLASH 0: CLE 


6030 


IF af="y" THEN GO TO 10 


6040 


IF a*="n" THEN CLEAR : PRI 


NT AT 12, 11 ; "Bye! ": PAUSE 50! CL 


EAR 


NEW 




Keyboard 
familiarity 



Across the pond 



the position of characters on tti 
keyboard. To assist in "learnin 
by play" I wrote the simpl 

10 LETL = 
20 LETC^O 
30 INPUT AS 
40 LETL = L + ( 21]* (IN- 

KEYS -"6") - 

(L 0] *IINKEYS = "7") 
50 LETC = C + (C 3D* [IN 

KEYS = "8"I - 

IC 0) * (INKEYS = "5") 
60 If INKEYS = "9" THEN 

PRINT 1 ' *" 
70 IF INKEYS = "0" THEN 

GOTO 30 
80 GOTO 40 

On BUNing the program stop 



avid reader. I usd to read the 
U.S. publications SYNC and SQ 
Quarterly, but both have gone 
by the wayside what with 
TIMEX ISinclair getting out of 
the marketing of the Sincalir line 
over here. So now it's back to 
the 'mother country' to keep life 
in the old ZX. Is there any way 1o 



goal 



Second, and my main reason 
for writing, I just got around to 
LOADIng "MATHS MAZE" by 
Nick Broom [ZX Computing 
Dec/ Jan 841, arid ran into a cou- 
ple of bugs. The first bug was a 
5/3050 halt (Display full - 
Enter CONT to proceed). I soly- 



Graphics 
2000REM * * *LEFT 

THE TRAIL* * * 
201 OPRlNT,,., "YOU LEFT 

THE TRAIL. YOU 

HAVE"," BEEN 

PENALIZED ONE 

POINT." 
2020LET 

SCORE = SC0RE-1 
2030FORX=1 TO 10 
2040NEXT X 
2O50GOSUB6SO0 
2060GOSUB 1000 
20 70 RETURN 



I am now awaiting delivery of 
a TIMEX Sincair 2068 computer 
(the U.S. Spectrum), a TIMEX 
2040 printer (the U.S. ZX 
printer) and a TIMEX 2020 



XCotr 



jtinglU 



obtain Numbers 1 through 9 of 
volume 1 to complete my set. 

I have had my 16K ZX81 
w/Suntronics keyboard and 
Sanyo tape recorder in almost 



Thanks for a great magazine. 
Sincerely yours 



USA 






drawing using normal c 
(5689) control Iwho r 
L0GO?ll. Pressing key i 



A little SAGA 

Dear Sir. 

As a possible candidate for i 

Royal Yachting Association Cer 

the navigational programme b) 
Mr. Eric Hutchinson listed in thi 
Apr/May edition of ZX Com 



am inserting at I 
.104,155,195,210,693, 
..767,920,925.935. 



1009, 1019. 



I GOSUB 3000 



Dear Sir, 

With reference t 

dated 1 1th April regarding my 

difficulty in loading tl 

tional programme by Mr. Eric 

Hutchinson in the c 

tion of ZXComputin 

this problem by 'Ic 

into the ZX8 1 and there by get- 
ting the 00 on the screen. In- 

failure) I pressed GOTO 4015 

structions were displayed or 

I am e newcomer to computing 
but thought it may help any 

be any nowadays!! 

A. Russell Hey 

Taken to task 

And now for a big 'un 
Dear ZX Computing, 

Mclean and Gordon's book Of 
Spectrum programs ("Taken to 
Book" April/May). Apart form 
the high quality of the listing 
print, (my complim 



and ineffici 



this particular program by pos- 
ing the following questions: 
1. Whyisthe 'Diary' displayed 
at the beginning for 2 seconds, 
and then wiped from tha screen 
before the information is given? 
Could it not be displayed at the 
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2. IF option 4 is entered (line 
1301 by mistake, the screen is 
cleared. "Wrong response Press 
any key" is displayed, and you 
are vary lucky if you see it! This 



Do you think: 

PAUSEO;CLS:GOTO110 

or something similar is missing 
from line 1 40? 

3. Attw reviewing or writing a 
page, the program returns to the 
place from whence it came and 
stops. Why? If it returned to the 
original menu of choices, more 
than one page could be review- 
when writing another page us- 
ing e non-initialised array, dS. 
This will not all be overwritten if 
any test lines are short. So line 
200 could be a subroutine for 
filling the array with spaces 
before jumping back to line 110. 

4, Why should anyone want to 



7. Is PRINT dS invalid? (line 
490?l The only way I can 
display the array dS. which is 
2-dimensional. is by using d Sin] 
and separating it for values of n 
from 1 to 21. 

8. Why, after clearing the 

options, is it necessary for op 
lion 2 lo pause again and clear 
the screen-again? It seems to 
me thel line 220 is unnecessary 
since tha program pauses at line 
230 to await the date. 



Corrections for 



allowing for the ENTER key -„_„_*, 
(code 1 3), after the key pressed AUfJUSC / 
to start the process has been September 



fairly r 



t faults. So mi 



may 



say that they v 
But it's all relative y'know. 
Anyway, the first fault was with 
the program 'Day of the Week' 
from 1 K Corral, The accompa- 



n David's 

it through 



-figure 



1 This 



ipe recorder has been set- 
irrectly, so that the saving 



md RUN tl 
o doubt, a 
a -type the 



BASIC program used to imple 
ment LOGO on your Spectrum 
Is that clear? No? If it isn't clear, 



nd problem occur- 


Slogo which 






sehes. If you cast 


text. Phew 1 



reeled, added to 
The only facility w 

backspacing on 



...displays ti 
his can then 
I, adjusted, c 



FIGURE 2 




LET JAN ■ 


DIM DSI7.6) 




LETD9(1I = "...SUN" 




LETD$(2l = "...MON" 


LET APR = 6 


LETD$<3I = ",.TUES" 




LETDS14l = "WEONES" 




l_ETDSI5) = ".THURS" 


LETJUL = 6 


LETDS(6)"...FRI" 






LET SEP = 5 








LET NOV = 3 




LET DEC = 5 




The missing ftgum 2 


yom^or-^w**-^™,*™ 



Long sort 

Dear ZX Computing, 



Notting Dale Hi-Res 

Daar ZX Computing, 

Since May of this year I have 

Notting Dale Technology G007 
Hi-RespackfortheZX81 (16KI. 
I have written a Ducks hoot pro- 





Nigel Salt's program 


gram for the pack using some of 




'DATAFILE' in Apr/May ZX 


Tim Hartnell s graphics from 


very quickly and not very well 


Computing. 


your June/July 1983 issue. 1 










knowledge of the keyboard, 1 






eagerly typed in the program, 




sort of inefficiency is giving pro- 






gramming a bad name , and is oc- 


data store I600records, each of 




curring all too frequently, not on- 










users might like to get in touch 


software tool 




with me for a postal interchange 


16. What can you do if a pro- 


Long than it took to type in the 


of ideas, techniques, programs 










Can onyone help? Can you 


Yours faithfully 


it should? Try contacting mo la 


publish a revised sub -routine, 


J D Almond 




possibly in something 1 m told is 














Chelmsford. 




the SORT routine in Nigel Salt's 


ESSEX CM1 5PT. 


Ring Kenilworth (09261 55376 














N.A. Shackleford 


program. However we publish- 


Yours faithfully. 




ed your name and address es re- 


Frances Daniel . 


Can anyone offer any help? 


quested. 
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^PROTOCOL ^T 

GAME CONTROL 
CUSTOMISING 
for the ZX Spectrum 



FEATURES 

* Compatible with ALLSpectram 

software. 
" Hardware programmed by unique 
Custom Card' - simply snap into plane 

* Direct addressing ensures optimum 
response time. 

* Pre-programmed cards for AGF/Protek 
Kempston and ZX Interface 2 prod 

* Side entry joystick port eliminates 
flying leads. 

* Low power four i.e. design. 

* Recessed Computer Reset button for 
clearing machine code programs. 

* Rear expansion port. 




a memory or 
back up software. 
Up to five individually programmed 
Protocol 4's per Spectrum for multiple 
control applications. 



Protocol 4 is a completely self-contained joystick interface. It takes all sticks, including Quickshot 

II with 'rapid fire', or trackballs, and allows them to work with all games. 

Because it is fully programmable you can customise game control to your own requirements i.e. 

put the 'pause-game' facility onto an unused direction of the joystick for real armchair control. 

Likewise you can disable any joystick functions that you find annoying or problei 

The Protocol four 

on the keyboard. 



n unused din 
ny joystick functions that you find annoying o 

s hardware programmed technology t 



1 of any key 



Th 



emented by a unique system of 'Custom Cards'. They simply ( 
configuring the interface to replicate any keys. 
No tapes to load or contortioned joystick i 
is retained by the cards. 



; required t< 



i immedia 



i, all programming 



To make the Protocol 4 e 
Cards' that will make it w< 
All 'Custom Cards' i 
to enable a whole dedicated o 



l easier to use it will come supplied 
like AGF/Protek. Kempston or Sim 
t be infinitely re- programmed, if desired, 
mtrol library to be set up. 

Diagonal movement is automatically available once the four normal directions 



th 4 preprogrammed 'Custom 
ir ZX Interface 2 adaptors, 
extra packs can be purchased 



SINCLAIR NEWS 




Anyone for 
tennis? 

rmBureweareellpleasedtosee lair to compare it to the "teal 
Psion's new Spectrum program ihing" however I would venture 

Sinclair label. Hands up all those close as is possible. By making 
mho were beginning to feel trie position of the player deter- 
abandoned in favour of the OL? mine the type of shot played, a 
I once owned and enjoyed a fair amount of subtlety and con- 
game centre, but this version is ly five keys or a joystick. 
larmoresophisticated. At £7.95 Psion have once 






liting (or t 



Sinclair 
Research 
continues to 
expand 

be the most popular home micro Acorn in second and third places 

in Britain, according to market respectively. 

research organisation Audits of Sensibly, Sinclair are not 



PRESTATYN HIGH SCHOOL 
2nd COMPUTER FAIR 
sat. 29 Sept. Prestatyn 
10.00am -5.00pm 



demon st rat ior 
Forces, IT and 



H0TECH-5/»0Ct. 

Royal Garden Hotel, London 



PERSONAL COMPUTER WORLD SHOW 
19/24 sept. 
Olympia 2, London. 



video and chips 

Director Ale* Kirbv intends I 



K COMPUTING 



SOFTWARE NEWS 



• Martsch seem lo be calling themselves Software Com- 
munications Ltd. these days and neve produced "The Odyssey 
of Hope" for the 48K Spectrum. This is art adventure game 

Jump Challenge should also be around now, and this is 
described as a highly realistic game where you jump your motor- 
cycle over obstacles. None other than Eddie Kidd himself will be 
helping to promote this game. 

* Griffin Software have four recent additions to their educa- 
tional programs of the 48 K Spectrum, all are for maths. 

Mental Arithmetic for age 8 - ~ 
15. The Theorem of Pythagora; 
Trigonometry 1 2 to 1 6 . 



well, have 
market t he i 



•oft. t 



m software in the U 



if the USA t 
The first tw 
;C7.95eech 



■ Football Manager 

by the addition of some hi- res graphics. The company lellm 

sales of this grandaddy of games are still as high as they de 



HE5.9B. E7.95and£6.9 



h Galactic Softwt 
and beyond games. 
We look forward with interest to the ne» 



at selling games 
supply and to ex - 



[or puzzle as Haresoft insist it i 
i' Masquerade Jewelled Har 



,eAPR/MAVissuean( 



CCS stragegy 




A bright spark 



P1X Mill 



Similar to 


but more com pie* 


Dix Mille ke 


t my daughter oc 


cupied for 1 






rench dice garni 






the scoring 




differ. Up to 


lix people can play 






as one of thi 










yers have had the 




SOFTWARE NEWS 




PSSt! 


Marlboro Clubman's Champion- 
ship at Silverstone on the 23 (24 
September. Finally, the classic 
ZX81 favourite, The Gauntlet. 


Coventry company PSSare very 
busy lately- Apart from having 

the Enterprise Award. They 


reissued. The news is that high 
street store Menzies reports an 
excellent response. 

The Gauntlet costs £4.95 
(or the 16KZX81. 

The latest Spectrum game 
from PSS is Les Flics and is bas- 


CI 0,000. 

sponsorship to Kevin Bowes, a 


f amous by the late Peter Sella rs. 

Now showing at your local 
software centre lor£6.95. 



Argus Press 

Software 

Expands 




• Voyager Software is a company 

their lirst offering m Crazy Cranes for a 

unload ships as they pass by the pie 



describe it as 
Sounds 



Software have their fin 
i being a tactical fun-ai 



s Centre, Gorsey Lane. 



:48K Spectrur 
id at £5.96. They 
ne about deranged 
:>l machine codi 



• CRLhave their long awaited and well publicised 4BK Spec- 
trum program "The War of the Worlds" on the market for £7.9 5. 
If you get stuck in thia game then refer to the LP of the si 
name. I wonder if the game will promote the LP or vice vers 

• Some really top quality games have been produced since 
last issue, one of which is "Worse Things Happenat Sea" - 

captain of a very leaky cargo ship and you realty have to wor 

• Artie Computing Ltd. pledge to bring out at least one r 
game per fortnight until Christmas. Some of their recent releases 
in this batch are Mr. Wong's Loopy Laundry, a platform and lac 
ders type game, Death Chess 5000, which will either play a rcoi 

' jama of chess or a hybrid chess/arcade game, araJ. m 
irite. World Cup, a 3D perspective animated 1 -9 playet a 
type football game. Great. 
I these programs cost £6 .95 . 



if champagne failed to provided the stimulus 
K Spectrum 



games. Space Command is 

vides plenty of action for spa 

The price is E 5 .9 5 from rr 



)' game which pro- 



• Great to see software from a naw source. Ventamatic are 
sending their Spectrum range from Spain to the UK. The four 
gamas I have seen so far are Craiy Climber - a version of the ar- 
cade game where you climb up a building; The Builder — a simple 
but fun building block game; Martian Tunnels — a maze chase 
game, and Wreckage - a space zap game, The graphics are ex 
cellent and on the one I've seen, Crazy Climber - they really are 
going to make an impression on the market hare. I only hope they 
get insert cards printed in English though, a lot of experimenta- 
tion was needed before I could make any sense of the game I 

• Computing ishelll Or at least playing Richard Shepherd's new 
game'The Inferno' is .This is a devious graphic adventure based or 
Da nte' s concept of hell as depict 
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I SOFTWARE NEWS] 



V'VI V |;. 



Scott Adams Spectru 
graphics put it into t 



• Melbourne 
strategy/simul; 
Classic. Lucky 48 K Sped 

• Longman Software presented what they describe as " Revolu 
tionary software" forO level and CSE revision. 

Maths, Physics, Chemistry and Computer Studies are the firs' 
five titles and each ate presented via a database plus interactive pro 



• Fantasy have pens 
introduced Beaky, orw 
rare goggled variety. 






eracingw 
Many track optk 



51 'or ul 



a game fans. 

it ion for producing ei 



• Widgat have an excellent rep 

software, their two new programs are in the adventure game mould 

and are great for encouraging learning by experience. 

Many people seem to think that education is about learning facts 
or practicing tables etc. Infact there is a great deal of learning dona in 
an incidental way from programs such as these. 

The two games on Adventure Playgrpund are aimed at early 
readers up la 9 or 1 year olds and Castle of Dreams is designed for 



11 t< 



Not k 



• Star Trader is 



I lightly and worth e : 
lerexcellentprogran 



y of tr 






it to be confused wit) 
tally different I, This is 
id is a challenging qui; 



Anei 



3t of quest ioi 



iv id ed and furthers 






Software Farm had a resounding and well deserved success 

It Forty Niner, a hi-resZX8! game. They have now produced the 

follow up, also in hi-res (Spectrum graphics without any add onslll, 

called Rocketman. At £5.95 it is probably a must for the ZX81 

iftware Farm is al 155 Whiteladies Rd., Clifton, Bristol, BS8 
2RG. 



Micr 



,:,I„H 



lyEB.OO. The full price! 
st spreadsheet program; 
Microsphere Computer 
N102LA. 



d original, and possessors of 
ning their original and paying 
nd this is probably one of the 
orthe4BKSpectrum. 
d. 72 Rosebary Rd., London 




I22K original) into a 16KZ 
from the listing publishe 
Computing Today when I 
over ZX Computing. That pro- 
ject had to be shelved as a con- 
sequence, but I did get an insight 
into the very complex logic 
behind it. Probably one of the 
most complex trading games I 



it £ 6 99 . 

jrt of APS isthe family 
tr Cloggs. Their range 
onal software is gain- 



are now eight games in 
sr Cloggs series; Party 
j Ship shades for age. 



Safty forage 5+; V 
Blockbuster and Mu 
7- and Star Truck 



can easily replace those built 
to the program. Also, a Cleu 
Cloggs club is run for fans 

These programs cost £ 7 ,£ 



Beginners' 

BASIC 
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BOOK NEWS 



Clive's previous book was 
written for the NEC [National Ex- 
tendon College) and the BBC to 
accompany The Computer Pro- 
gramme and indeed "30 Hour 
BASIC" has become the stan- 



s and feedback from 30 
BASIC. Clive has refined 
Beginners' BASIC 
result. It is published in the 
type of binder bur is ap- 






designmg programs can be 
tackled. The advantage of 
"Structured" programming is 



The book attempts to show 
how programming can be an en- 
joyable, experimental, activity. 
The reader is encouraged to 



would wholeheartedly rt 

ner because of the style ai 
pertise. Anyway it is bet 
get to grips with the essf 
rather than bogged doi 



suffidern in BASIC. 

By the end of the book the 
begin ner should have developed 



NEC + YTV = 
"Me & My 

Micro" 




^S handling and keyboard < 

The book can be used in con- 
Am I getting senile or do I junction with the Yorkshire TV 
remember being told repeatedly 

"Mym 



i.Witt' 



slipping or am I being fussy? programming from virtually a 

National Extension College is looking at what is available an 
E2.9E for 1 15 pages. The text finding one which suits you 
is packed in and the programs reading preferences. I suggest 

and BBC/Electron Basic. a look at this one. 
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Bernard Babani who market a variety of small 

4 Practical Introduction to Microprocessors' 
ose who have some knowledge of general ele 

The book operates by ct 




orthare publishing two books of interest LoAdventun 
tics, "The Adventurer's Companion" by M. 6 P. 
i complete guide to playing four of the most popular 
: The Hobble Colossal Cave. Advemureland and 



"The Adventurer' 



A chapter for beginners is includer. 
ection, and a list of recommended a< 
ooksse!lat£3.95. 



Both published by McGraw-Hill they are worth lookii 
you prefer your information presented in a step by stepai 
simple way. 



HARDWARE NEWS 1 



in 






. Brief 




ontrol is interesting more ar 


dmor.p-pk 












this too is 


timing down gradually. 








in Cybernetics, Andover. 






ferent fully programmable robots, thes 


mplest is Kei 












PI 02 a complex robot arm at £1476. 00. 




• Kelwo 


d Computer Cases, Downs Row, 






S602HDhavecomeupwi 






whole of the Spectrum's c 


se when all that is really 


needed is I 


ia( the keys themselves ar 


replaced? 










plete top ot their own. not iust the rul 






This mean 


that only the height of the 














tive worth considering am 


as Kelwood c 






ofairsetc.Mllet you know 


ssoonaslcar 


get a good 


K-Board 


costs £28 .50. 






• Challenge Research, 218 High St 


Potters Bar. 


Herts. EN6 


5BJ have 


cassette recorder specifically for the Spectrum. At 




jems expensive, but it con i 






that all software, including commercial 




times as fast and with increased reliat 






One ha: 


aeen despatched for review 








\f/j'l"^m 











Four from 
Dk'tronics 



the key legends which v 



The Beep Amp 



anything about the back of the 
case which sloped awkwardly 
on the old model, hopefully they 



The joystick 
interface 



joystick interfaces 
ing. This is fully p 
and they claim it v 



keys to play them. 

Often I ha ye comi 
the lack of planning w 



The 3 channel 
sound synthesizer 



k of it - 



ein to tell few rr 



Super champ 
joystick 

Dean Electronics Ltd. who im- joysticks. Instead of having 

port and market the impressive trail of cable lurking around yc 

Alphacom 32 printer have computer, the Super Champ's 

entered the crowded joystick tenfeet of cable can beietracted 

port which they tell me has been The handle is said 

the top selling joystick in the specially contoured to [ 

USA for the last two years due maximum comfort for bt 

to several features not usually and right handed players, 
found on the majority of A feature which Dean Elec 



left 



te interesting. Unfortunately 
lough they sent a couple of 
ns to us the GPO managed to 



The keyboard 

The first item is a Microdrive 



and decimal point keys 
/ided in single keypress 
A good ideas as I'm 
entering data as 1 m2 




The keyboarc 
with the Spectrui 
interface I attached 



The numer 

lodel is retained and Dk't 
ell me that the old probl 
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»0 k or Paw MYsruv 

IMMiTUM 



" S 




kKpcwb 



jb vour strength lei 



■ hi; rotter yuur score, ;he si ranger and foster you'll be. 

■ . wiMiconsttiniiy-c'riarignig. static ana moving 
graphics Brilliant music ond sound affects add to Iheeicilemenl. 

■ Asprjttotlhe ■Eureka!" pack, you fecelveatuH-colounilusiroled 

■■■■■■: ■4'ii ■ : : ■ ■ ■■ .■ ■ ■ ' '- .,■■.,- , ,:■ 

reen togelhei. you steadily unlove! the clues rani hm 



ofdefbvCredftCdidonine 
'y "Eureka 1 " Telephone Hotline 01-460 6000. 




Csaszor mock rr». 

¥EARStocr9orc.':i'.:-i-: *M*i 
i graphic amsis. 2 



ir (louts! ! /l^^^^x /-V^>- 



■HARDWARE REVIEW* 



On Line 

Ray Elder describes his close encounter 
with British Telecom 




(HARDWARE REVIEW! 



the plain brown envelope thai 
eventually was sat on by the 

Excitement becoming more 

The Spectrum box 

The unit which I am using is the 
Prism VTX5000 , this is a direct 

under the Spectrum and is the 
same length but slightly deeper 



pact and has an ON light, a LINE 












switch and a 3 way slide switch 
marked M/MET. Tx and Rx on 

A lead comes Irom the back 
of the unit and is plugged into 










On Wednesday the BT engineer 


The last roundup 


lead is then plugged into the 


called, 1 was out, my wife ex- 




socket provided at the back of 








move phone from from to back 


soon as the Spectrum was sw 








plied which has three sockets, 


"Ummm. Very sorry, that's 


appeared, on pressing a key 


one for the back of the unit, one 


an 'outside' engineers job. Can't 




10 fit the Spectrum's port and 
















1 am using the ZX Lprint 




a day drinking tea and climbing 




have liked it to have been longer 


ladders. Eventually the phone 




to allow for non standard set 


was repositioned, a very neat 


itialised before use so 1 presse 



some free — perhaps not prof es- 

expect - and some charged for. 

I can order goods through 

this system by quoting my credit 



ectel, another user group, I 
I use their mailbox facilities. 
I also found a "personal" 









9 info, held ir 

•erybody and personally I find 
the most exciting develop- 
lent that I've encountered. 



ting the mod 
keyboard ar 

adapter. The i 



Actually e. 
manual is wri 

stepbystepn 



in a confusing way. The main 
sections dealing with operating 

"The main features" and "User 
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sockets and also managed to 


ga v rfh e 1 " *J'u7s™ tah 


enough time logged on to keep 




copy write notice. 


Buzby in birdseed for a year or 


Quoting prices is so the Taxman 








then stopped. There was no 








samples of the Prestel IP pages. 


now permanently picks up radio 


Modem program bar turning off 




4 and this does not seem to be 




Micronet already or link up in the 


appreciated by Prestel. Excite- 


machine, and this would mean 




ment reached fever pitch. 


the interlace would need to be 


through Mailbox and my number 






is 919993265, whether 1 will 


ZX81 box 








discovered that by getting into 






LOAD or SAVE mode from the 


writes will depend on how many 


able to test out the ZX8 1 adap- 


modBm and pressing BREAK, 1 


people make contact. As usual 










get back to the modem. For- 




unit has been delayed on its trip 


tunately they had allowed for 


PRISM MICROPRODUC TS L TD. 


to us. I will quote from the inf or- 




IVTX5000I 






Prism House. 


The unit fits between the 


downloading software. 


18-29 Mora Street, 


ZX81 and the RAM pack and 


Right, option 0, enter my 


London EC 1 




identity, phone number given. 






When carrier tone la high pitch- 


MICRONET BOO 


junction with both acoustic and 




Telemap Ltd. 






Scriptor Court. 


With both ZX81 and Spectrum 


i did. it worked 


1 55 Farringdon Rood, 


units the screen is chain).' : nto 




London ECIR3 AD. 


a 40 character per linu format 


password l was^ greeted by 




and the double he oiu ar-a 




MICROCOMPUTER RESOURCES 


graphic modes are also uMd 




IZXSfl adaptor/ 


The ZX81 loses the colour. 




f Branch Road, 


flash and more sopmstica'ed 


there ere hurdreds, probably 


Park Street Village, 


screen controls but the Soec 




St. Albans, 


trum unit copes admireoly 


panies providing nformation. 1 


Hertfordshire 



to four people, none of tr- 
ing a subject they we 
graphy, camping and moi 



POBox3 
Rayleigh, 
Essex SS6 SLR 



4 printers, 

The daisy M. wheel, dot matrix and colour printers. 





cassette umtl 

I For program storage and ~™»^^^^^ retrieval. For faster stc 

monitor, |S| jovsi 

Gives really superb reproduction ami clarity (^k,, .-.mt^M ' They »/putthecS 

a vast range of sol 

I hEres something far everyone and for all interests.. V-^thought-provoking, amusing, entertal 

lnoine,g}|Jedi 
mai a 64t 




' Plus excellent sprite graphics: 



fVhout the only thing the Commodore 64 doesn't ha 




single disk drive, 

il of programs. ^-^ Uses a 51A" diskette, and has a very large 17DK memory 

tk-^m^Lpaddles, 

lames directly into your hands. .. they Aalso improve both speed and accuracy. 

MirelS3(business, 

'"nnging, and exciting. To cover the essential office and business needs.. 

ationat Qgames) 

=A with the help and advice of specialists. _ gHH»™ C^From shoot em up to strategy. 

memory 

King music synthesis capabilities.*/ 



THE COMMODORE H COSTS JUST 1222 IOR LESSl. 
FOR FURTHER INFORMATION PLEASE TICK ONE. Dfi MORE. DF THE BOXES 
AND SEND TO" COMMODORE INFORMATION CENTRE. 1 HUNTERS ROAD. 
WELDON, CORBY NORTHAMPTON NN17 10X TEL CORBY 105361 205252 




| tk commodore 
iany serious competition. 



IZX81 EPUCATIONALI 




The Sky at Wight 

J D Nicholson presents a program based 
on the sky at night in Lincoln. 



program will display 



If you ante 



couraged to try 



i sugnest that v°u che< 

you go 

The last time I saw stats wt 
when I'd refreshed myself ove 
much at the Plough and Ha 



20 FOR 1=1 TO 3 
50 FDR J=0 TO 14 
40 GOSUB J*20+500 
50 PRINT TAB I0;C* 
60 GOSUB 1000 
70 PAUSE 100/1 
80 CLS 
90 NEXT J 
100 PRINT "WOULD YOU LIK 
*• THE TEST^-VES/NO" 



12 



(1)=" 



THEN GOTO 15 



150 PRINT "WHAT DIFF I CULTY- 1 , 2 , 

160 INPUT A 

170 LET D=3-A 

130 LET S=0 

185 PRINT 

190 PRINT "ENTER EACH LETTER SE 
PARATELY AND N/LINE AFTER EACH" 

191 PRINT 

192 PRINT "IF THE ANSWER IS 
TWO WORDS REMEMBER TO ENTER 
A SPACE BETWEEN THEM" 

195 PAUSE 500 

200 CLS 

210 FOR 0=0 TO 14 

220 GOSUB Q»20+500 

230 GOSUB 1000 

240 PRINT C#( TO D) ; 

245 FOR K=D+1 TO LEN C* 

250 INPUT B-$ 
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JZX81 EDUCATIONAL! 



260 IF B*=C*(K) THEN GOTO 290 

270 LET S=5+l 

280 GOTO 250 

290 PRINT 6*; 

295 NEXT K 

29B CLS 

30B NEXT B 

JIB PRINT "SCORE=" ; 100-Sj "/I00" 

320 PRINT "D0 YOU WANT ANOTHER 
TEST V/N" 

33B INPUT X* 

34B IF X*(1)="Y" THEN SOTO 150 

350 PRINT "DO YOU WANT TO START 

AGAIN" 1 Y/N" 

360 INPUT X* 

370 IF X*(1)="Y" THEN GOTO 20 

375 CLS 

380 PRINT Al 10, 10; "THANK YDU" 

390 STOP 

50B LET A*="22*.21- -.20* *.2 

B*. 11-* *.09*-21-. 08-22*. 



7-22- 



2(?F 



EGULUS. " 

510 LET C*="LEO" 

515 RETURN 

528 LET A*="04* *-. 10-. 1 L*. 12 

* *. 15-23-. 16-22-. 16-22 

--. 16* *. " 

530 LET C*="URSA MAJOR" 

535 RETURN 

540 LET A*=". 12*. 12-. 12-. 12-. 12 

-17* *02DENEBS * ■ 12 

-.12-. 12-. 12*. 12-. 12-. 11*. " 

550 LET C$="CY6NUS" 

555 RETURN 

560 LET A*="03*.04 — .06 — 20+. 08 

— 21*+. 10 — 17 . 12* . 12-, 02 

, _ + + .B7 m ++06ALDEBA 

RAN .18*. 19 — .21 — +.23- + ." 

570 LET CS="TAURUS" 

575 RETURN 

5B0 LET A*=". 10+— 1VEGA. 13-. 13+ 
.13-. 12- -.11- -. 10+16-. 11-16 + 

.12-16-. 13 . 14-. 14*. " 

590 LET C*="LYRA" 

595 RETURN 

600 LET A*=".ll* ^CAPELLA.ll 

-. 10-17-*. 09-17*. 09*17-. 09- 
I7-. 09-17-. 09-I7-. 10-17-. 11-17-. 
5-15 — *. 11- — ■ 12*. " 

610 LET C*="AURIGA" 

615 RETURN 

620 LET A*=".06* *.05- -.0 

4 + 10-. 05-1 1-.06-11-. 07-12+. 08-13 
+,09-*14-.Il — 15-20*. 13 — - -.1 
5 ^RCTURUS. 17-. 16+. " 

630 LET C*="BOOTES" 

635 RETURN 



.07-. 07+. " 

650 LET C*="CANIS MINOR" 

655 RETURN 

660 LET A*=". 03*26*. .04-25- 
-24-. .06-23-. .07-13-*21~. 12- 
08- - * -.10-17 — *.09* 

670 LET C*="CASSIOPEIA" 

675 RETURN 

680 LET A*=".0BSIRIUS^ * 



-. 10 



9-15:6 *.0B-. 07* 

"CANIS MAJOR" 



690 LET C* 

695 RETURN 

700 LET A*=". 13*-. 12- -.11-16* 
. BETELGEUZES16-. 10-15-. 11- -.12 
- -.12** *.12- + -.11- + -.11- 

* -.11-17-. U-18WIBEL. 11*. " 

710 LET C*="ORION" 

715 RETURN 

720 LET A*=". 07*. 08-. 09-. 10-. 11 
-. 12-. 13-. 14-. 15*. 15-. 15-. 15-. 15 

730 LET C*="ARIES" 

735 RETURN 

740 LET A*=". 01*. 01-06+. 02- +. 

03*-. 04-. 05*. 06-16-*. 08-* *-. 

09-14- -.08-14- *. 07-14-. 07* 

-». 14+. 15*. 16-. 16-. 17- -*. 17*-. " 

750 LET C*="PEGASU5" 

755 RETURN 

760 LET A*=". 08*15*. 08-15-. ALTfl 
IRg — +.05- - - -.05+-11- -.12 

*. 10 — -.09+14-. 08-15-. 07*16-. 17 
-. IB*. " 

770 LET C*="AQUILA" 

775 RETURN 

780 LET A*=". 10-*-. 09-13-. 07+-1 



.07- 



-13- 



-. 17- 



20+. 



790 LET C*=" DELPHI NUB" 

795 RETURN 

1000 FOR L=l TO LEN A# 

1010 LET N=CODE A*<L) 

1015 IF N=27 THEN GOTO 1090 

1020 IF N>27 AND N<3B THEN GOTO 
1060 

1030 PRINT CHR* Ni 

1040 NEXT L 

1050 RETURN 

1060 PRINT TAB VAL 



1070 LET L=L+1 

1080 GOTO 1040 

1090 PRINT 

1100 GOTO 1040 



A*(L TO L+ 
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'Calling all whizz I 
my CLEVER CLO 
games are the 
ultimate challenge" 



-r£5P&. 






jijki* f tf.it isalty x jv learning inn 



(SStv 



CLEVER CLOGS 

early learning games 



<a»^o 



% 
p 






as b sum sin 




jii 



The Cheetah Remote Action Transmitter is the most 
sophisticated computer controller available, 
ft has these features: 

■ Infra Red transmission -so there are no leads trailing 
across the living room. Just sit back in your chair up to 
30 feel 'from your machine. 
M Touch control- no moving parts, extremely fast, long life. 
17 No extra software required. 

W '-Can-be used with all Cheetah RAT/Kempston compatible 
. : software. 
W fits comfortably in your hand for fang play periods. . 
& Comes complete with receiver/interface unit which simply 

plugs into the rear of your Spectrum. 
W Compatible with ail Sinclair/Cheetah peripherals via the 
rear edge connector. 

Simply incredible at £29.35 including VATandp&p. 

Dealer enquiries welcome. Export orders at no extra cost, '•,-.:...- 1 

Sendcheque/p.onowto: 
Cheetah Marketing Ltd.fDept.ZX), 24 Bay Street, London EC1R3DJ. phone OJ-B334S0S : 

Cheetah products are also available from branches of 
■jflSIBSUBg $g& WHSMITH $ Rumbelows : ■ 

and all good computer shops. I ^Keetah 



Marketing 
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■EDUCATION REVIEWS! 



Spectrum lessons 



Mike Edmunds gives learning programs 
the final exam! 




The Learning box 
Series 

Spectrum 48k 
£9.95 each 
Arrow, 17-21 
Conway street, 
London W1P 6 JD. 



designed to help child en develop 
and extend upon basic reading 
and number skills. Four of the 
titles: 'Five Little Ducks'? 'Nine 
currant Buns. 'Goldilocks' and 
•Red Riding Hood' are for 



Than 



i Turn 



liiirui li 



, -The Ei 



'Mr. Mac's Day' and 
The Magic Shop' areforchilden 
up lo the age of eight. 

Each program costs £9.95 
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• 3 Original Games 

< Arcade. Adventure and Strategy 
more fun, more value — only frin 

• On screen reviews of 
newty launched games 

News and views of the wonderful, 
wtladcy world of home computing 



• UTILITIES 
Gamesters delights galore - 
improved graphics, sounds, 
disassemblers — it's all here! 




Spectrum Computing 
adds a new dimension to your micro! 



Run this Argus Spectrum tape and you'll 

soon see why it's Britain's top selling tape 

magazine. Each issue gives you a variety of 

exciting and challenging games to play, 

reviews of other newly released 

software plus valuable utilities 

enabling you to write your own 

programmes and games. 



Stretch your imagination and skills with 
Spectrum Computing — available every 
other month from WH Smith, Menzies and 
other leading stores. 

(You'll see them advertised on TV 
from September!) 

Get your copy today! 



Argue Tape Magazines produced by 
ARGUS PRESS SOFTWARE 

1 Golden Square, London W1R 3AB 
Telephone: 01 437 0636 




a 101 easier man 
choosing a computer. 



THERE are d.acri, uh|u.ilitv r ini,-r-, from which loch 
polity price lags ofarouncl £250. 
The Brother M-lOOt, however, breaks all the rules. 
Slays dctKiiiii> bnlmi ilu- ta«« h;irriiT. 

Though il ha- I. ir ilu in' lli.ln i(> l.lir-h.ircij leiltures,il 
lln i-xtraordinarily low price of £199.95. 

'travels al a steady fifty. 

In the sped slakes, the M-1009 is ccnrinly no slouch, being 
tuili i,i[i.-i|iie ol up ii. ii)( h,ir,ii.n-rs per second. 

Providing hi drnvlioiul ai'.d U.gii -rokini; pruning Kir ntimtal 
tdi.K.xUT- j n ■ fc urn dinuinnjl piiiilin^ h ■■ >upei and sub script 
,i[?..l urn phi'.*. „ , 

b r Prints umiiiy |h-tji«r. 

Being an impai: primer, the M-UK.N will prini on virtually 
-vt\ p.iper. ini hiding k-ik-j Ii'miIiiil;-. iii\ij[<.l.-> and standard ofhec 
stationery. 

It will even print nwi copies i needier with jour original. 
AsupeHli [i;ir;irn-r i-i'iiim inundation. 

in its price ranjie. I in- M-ltW has a greal deal mute character 
linn ni.iiiv |irinrcis. 

96 no less, plus iiiicrn.iiiini.il ivpe.uid graphic characters. 
Reliability comes its standard. 

Built lo ihe same eJticrJng standards as Brother's elile office 



reliab 



i, 9 , 1 .lot 






h.\~ l.mhless i.Ti'd.T.U.ih li 
(ample.-, lias an astuiiishing 



20 



One printer thai doesn't block out Ihrtigln. 

Many home computers tend to be a little on the large side. 
In contrast, the compact M-1009. at only 7 cm high, keeps a 
discreet profile. 

Weil designed, reliable - and a 



brother 



kss 



The future at voir fingertips. 



ISPECTRUM ADVENTURE) 



The Golden 
Chalice 




i separator r 

Sj #***-#*#*#**** " • • : RETURN ifM 6 

- 
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■SPECTRUM ADVENTURE! 



As promised, we bring you the second and final part 
of our king-size Spectrum adventure. 




• her mi t says: To i each /our"' "g . . . " ; GO TO 99°0 




oal you must enter the roggoth 


6330 RETURN 




-5 lair. But beware' " 


6340 PRINT " You are by the s 


tie 


6146 RETURN 


am. The Uood is to the east 




6160 PRINT " You are on the high 


6342 GO SUB 750: RETURN 




road. "'"A rough track branches 


6360 PRINT " The stream here 


ent 


northward"'" In the distance you 


ers a narrow reeky valley. 




see the Wood Perilous.' 


6362 GO SUB 750: RETURN 




6162 GO SUB 7501 RETURN 


6380 PRINT " You reach a h i gi- 


ro 


6180 PRINT " You are at a bridge 


nk face. The stream gushes 


for 


by a"' "stream which runs along 


th from" '"a narrow crack at 


ts 


the edge"'"o+ the WoDd Perilous. 


base. " 






6381 IF o(37)=I5> THEN PRINT 


■ "□ 


£182 GO SUB 7501 RETURN 


n the ground is a crumpled 1 " 


pie 


6200 PRINT " You are On the bank 


ce of paper resembling a map 




□ f the" ' "stream on the western 


6382 GO SUB 750! RETURN 




edge o-f " .' "the Wood. " 


6400 PRINT " VOU are followi 


3 * 


6202 GO SUB 750: RETURN 


path among"'"tall ferns." 




6220 PRINT " Here the stream run 


6402 GO SUB 750: RETURN 




b intD a"'"elear, sparkling pool 


6420 PRINT " You came to a s 


eer 




wall Of" '"rock. At the foot 


of 


6222 GO SUB 750 


the rock"' "face is a cave en 


ran 


6224 IF of7)=ll THEN PRINT " Th 


ce. " 




e knight lies on the gras3"*"som 


6421 GO SUB 750 




e yards from the pool , sorely 


6422 IF o(14)=21 THEN PRINT 


- „y 


wounded. He groans and"'" asks f 


du are in urgent need of a 


Ivic 


or water. " 


e! ! Press any key. " 




6226 RETURN 


6424 IF o!14)=21 AND INKEY*= 


" T 


6240 PRINT " You are in the Wood 


HEN GO TO 6424 




. To the" ' "north is a door." 


6426 IF n!14)=21 THEN CLS ! 


PRI 


6242 GO SUB 750 


NT ' ' " You may not know much 


abo 



' " AM t 



t a joining o y nop.? 11*=, 

ently trodden 6428 RETURN 



paths. " 
6282 GO SUB 750: GO SUE °200: 
TURN 
6300 PRINT " You are among dei 

re difficult" ' "to f ol low. " 
6302 GO SUB 750: GO SUB 9200: 

TURN 

6320 PRINT " You arrive at a I 



The ground" 


"und 




DOt 1 


s wet 


an 


d si 


ppery. 












6442 


GO SUB 


730! 


GO 


SUB 


9200: 


Kb 


TURN 














6460 


PRINT 


■ You 


pa 


ts arr 


ong s 


(m 


y, moss-"*" 


-cove 


-ed 


tree 




= . 


pic 


'"9 


your 


*ay 


carl 


f ul ly 


ac 


ro»9 


the 


soggy 


gr 


aund. 






6462 


GO SUB 


750: 


RE 


TURN 







82 GO SUB 750! RETURN 
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6500 PRINT " You are in a toul-s PRINT ■ In the lamplight you s 


mel 1 ing" ' "cave - it is clearly t 


ee a" ' "fr igntful drop into a cha 


he" ' "dwel 1 ing of a troll." 


em to the east. " 


6502 GO SUB 750 


6646 GO SUB 750: RETURN 


650.1 IF o(131=25 THEN PRINT '* 


6660 PRINT " You fall into a bot 


¥au encounter the troll as he 


torn less"' " c hasm. " 


is leaving the cave." 


6661 PAUSE 50 


6506 IF o!13)=25 THEN PRINT " T 


6662 BORDER 0: PAPER 0: INK 7: C 


he troll grabs you, pounds you 


LS 


r head against the cave wall, 


6664 PRINT " You fall...": FOR i 


and makes a pie with you later"' 


= 1 TO 5: PRINT '"and fall. ..."': 


"in the day ": GO TO 9990 


PAUSE 501 NEXT i: GO TO 9990 


6507 RETURN 


6680 GO TO 6660 


6520 PRINT " You are in a large 


6700 GO TO 6660 


cavern -"'"the living quarters D 


6720 PRINT "You stand at the foo 


f the"' "roggoth. " 




6521 IF o(2l<>90 THEN PRINT * "Y 


d stone" ' "steps. A dim greenish 


our adventures .have exhausted"'" 


light"' "can be seen to the east. 


you - you are too weak to cont 




i nue . " 


6722 GO SUB 750: RETURN 


6522 GO SUB 750 


6740 PRINT " You stand in a colo 


6323 RETURN 


ssal cavern Dn the shore of an 


6540 PRINT " You are in a dark a 


underground" '" lake stretching e 


nd narrow " ' "passage . " 


astward as far"' "as you can see. 


6542 GO SUB 750: RETURN 


The roof of the cavern, hundr 


6560 PRINT " You are in a small 


eds of feet above" '"you, glows w 


dark"' "chamber . " 


ith a pale greenish light."'" Ne 


6562 GO SUB 750: RETURN 


arby are the entrances tD"'"two 


65B0 PRINT " You are in a narrow 


tunnels. " 


passage In the dim light , ou 


6742 GO SUB 750: RETURN 


see"' "rough stone steps." 


6760 PRINT " You are in a small 


6582 GO SUB 750: RETURN 


cave or, the"'"lake shore. Furthe 


6600 PRINT " You are in a very d 


r in, the cave " ' " nan ows to a me 


ark chamber ."'" Steps lead up and 


re crack which is"'"far too narr 


do™-!. " 


oh for you to enter . " 


6602 IF light AND NOT o<10! THEN 


6762 GO SUB 7501 RETURN 


PRINT " In the lamplight you s 


6780 PRINT " You are at the fODt 


ee s fesrlul drop into a chum 


of a flight of stone steps, a 


to" ' "the north. " 


t a junction of passages . " 


6604 GO SUB 750: RETURN 


67S2 GO SUB 750 


6620 PRINT " You are in a specio 


6733 IF ol33)=r THEN PRINT '"Th 


us cavern. " 


e Dgre attacks you.": RETURN 


6621 IF NCT light OR odDl THEM 


6790 RETURN 


PRINT -It is too dark to see an 


6300 PRINT " You are in a dark at 


./thing clear ly. " 


nd narrow" ' "passage. " 


6622 IF light AND NOT ollSJ) THEN 


6801 GO SUB 9250 


PRINT " In the lamplight you 5 


6802 GO SUB 750: RETURN 




6B20 PRINT " You are at a juncti 


to"' "the north. In a recess in 


on of " ' "passages. " 


the"' "cavern wall you see an iro 


6821 60 SUB 9250 


n"' "door. " 


6822 GO SUB 750: RETURN 


6624 GO SUB ■'50: RETURN 


6340 PRINT " You are in a small 


6640 PRINT " You are in a passag 


cavern" ' "which shows signs of ha 


e wh i ch " ' " s 1 opes slightly downwa 


ving been once inhabited by so 


rd? to" • " the east. " 


-ne" ' "creature. High up - and jus 


6641 IF NOT light OR o(10> THEN 


t out"' "of reach, a ledge has be 


PRINT "It is too dark to see an 


en carved out of the living ro 


ything" ' "else. " 


C k . " | 


6642 IF light AND NOT o<10) THEN 


6842 GO SUB 750: RETURN 1 
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6860 PRINT " You squeeze 

6861 GO SUB 9250 

6862 GO SUB 750: RETURN 
6880 PRINT ■ You stand ii 



thing-long ago. " 
6882 60 SUB 750 
6884 IF o<33)=44 THEN PRINT 



7002 GO SUB 750: RETURN 

7020 PRINT " You are in a long 5 

Iraight "> "corridor. ■ 

7022 GO SUB 750: RETURN 

7040 PRINT " You stand in a sm*l 









left 

6902 IF o!21> THEN PRIN 
drift aimlessly and die 
days later....": GO TO 9990 
6904 GO SUB 750: RETURN 

6920 IF NOT o!36> THEN PRIN 

Dcky shore with cliffs whii 
ower above you. Steps are" 
ed into the cliff face." 

6921 IF o(36> THEN PRINT 



LET o(36)=90: LET o(21l=' 
UB 750: RETURN 
6924 GO SUB 750: RETURN 
6940 PRINT " You are on 



7046 RETURN 

7060 PRINT "You stand before a g 

ful and mysterious designs." 

7062 GO SUB 750: RETURN 
70B0 PRINT " You are in a small, 
stone" ' "wal led room. ■ 

7081 GO SUB 750 

7082 IF o(29>=5-? THEN PRINT ' "B 
efore you, in an alcove, stands" 
'■the golden chalice of Ragadan. 

7086 RETURN 

8999 REM end of quest display 

9000 CLS : PRINT '" You are gree 

vi 1 lagers. "*' "Within minutes th 
e square i 



during the" ' " f ol 1 owi ng centurie 
s the 1 and "'" prosper s as you ste 
adi i y acqu i re" ' ■ the wisdom of ag 



6942 GO SUB 750: RETURN 

6960 GO SUB 9300: PRINT " You 

and at the entrance of"' "the 

endory temple of Ragadan. " 

6962 GO SUB 750: RETURN 

69S0 PRINT " You stand in a v 

hall, with pillars of gold 

sing upwards to a vaulted c 

i n g , " 



-rcjoo mini ' " i hue ends the quest 

of the" '"chalice of Ragadan." 
9010 IF INKEY*="" THEN GO TO 90 
10 
9015 RUN 

9099 REM map graphics 

9100 BORDER 2: PAPER 6: INK 1: C 
LS 

9105 PLOT S0,0: DRAW 8,16: DRAW 
-8,8: DRAW -8,0: DRAW -8,16: DRA 
W -16,0: DRAW -16,16! DRAW -8,0: 
DRAW -8,8: DRAW 8,8: DRAW 8,0: 
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DRAW 8,3 
DRAW 0,8 
DRAW 2,8 



DRAW 8,0: DRAW 
DRAW -8, 16: DR 
DRAW -2,8: DRA 



DRAW 8,8: DRAW I 

AW 0,8: DRAM -8, 

AW 8, 16! DRAW -2,8: 

AU 8,8: DRAW 8, IS 

9110 PLOT 136,0: DRAW 8,161 DRAW 

8,0: DRAW 2,16: DRAW 6,01 DRAW 
8,16: DRAW 0,8! DRAW 8,0: DRAW 8 
,16! DRAW -8,8: DRAW -4,0: DRAW 
-12, 16! DRAW 8,8: 

8,8: DRAW - 
AW 8,8! DRAW 2,8: 
W -8,8: DRAW 0,7 
9115 PLOT 72.12B: DRAW 4,0: DRAW 

4,8: DRAW 4,0: DRAW 0,8: DRAW 4 
,8: DRAW -4,4: DRAW -4,-4:_DRAW 
-4,0: DRAW -4,-4: DRAW 0,-4: DRA 
W -4,-4: DRAW 0,-4: DRAW 4,-8 
9120 PLOT 112,136! DRAW 0,32: DR 
AW -4,-4: PLOT 112.16B: DRAW 4,- 
41 PLOT 108,1521 DRAW 8,0: PLOT 
288,120T DRAW 0,8! DRAW -4,8: DR 
AW B,0,-PI: DRAW -4,-S: PLOT 204 
,128: DRAW 8,0 

9125 PLOT 188,78: DRAW 40,0: DRA 
W 0,2: DRAW -40,0: DRAW 0,-2: PL 
OT 18B.104: DRAW 40,0: DRAW 0,2: 

DRAW -40,0: DRAW 0,-2: PLOT 188 
,106! DRAW 20,8: DRAW 20,-8: PLO 
T 192,80: DRAW 0,24: PLOT 194,80 
: DRAW 0,24: PLOT 19", 80; DRAW 
,24i PLOT 201,80: DRAW 0,24: PLO 
T 207,80: DRAW 0,24: PLOT 209,80 
: DRAW 0,24: PLOT 215,80: DRAW 
,24: PLOT 217,80: DRAW 0,24: PLO 
T 222,80: DRAW 0,24: PLOT 224,30 
! DRAW 0,24 

9130 FOR i=0 TO 8 STEP 4: PLOT 8 
8, 64+ i: DRAW 4,4: DRAW 4,-4: DRA 
W 4,4: DRAW 4,-4! DRAW 4,4: DRAW 

4,-4: DRAW 4,4: DRAW 4,-4: DRAW 

4,4: DRAW 4,-4: NEXT i 
9135 PRINT INK 2JAT 5,l;"Caves" 
SAT 7,2! "of; AT 9, 1 f "Doom- j AT 13 

9140 PRINT INK 1 i AT 7,12S"The-i 

AT 9, Hi "Great" [AT 1 1 , 1 1 ; "Lake" ! 

AT 0,14! -N- 

9145 PRINT INK 2SAT 18,24i"THE" 

JAT 20,21! "LOST LANDS" 

9150 IF INKEY»=" " THEN GO TO 91 

50 

9155 BORDER 7: PAPER 7: INK 0! C 

LS : GO SUB 6000+Z0*r: RETURN 

9199 REM crsepy events in Wood 

9200 LET a-INT !RND#10> 

9201 IF OI14IOZ1 THEN RETURN 

9202 IF NOT a THEN PRINT '"You 
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9204 


IF 


a=l 


THEN 


PR 


NT 




ing c 


reepy drops 


fro 




a 


on br 


usl 


It 


ati . 


: RETU 


?N 


9206 


IF 


•-2 


THEN 


PR 


NT 




ar ar 


eerie 


Mai 1 


ng 


n 


h 


tanca 




RETURN 








9208 


IF 


a=3 


THEN 


PR 


NT 




DH wl 


is 


les 


by, narr 


iwl 




ng yaix. 


: RETURN 








9210 


IF 


a=4 


THEN 


PR 


[NT 





RETURN 
'"You gl 



' "The su 
HfeTURN 



9212 IF a=5 THEN PI 
htened deer runs pa: 
9214 IF a=6 THEN PI 
lmpse a figure anion 
,but it disappears. 
9216 IF a=7 THEN P! 

9220 RETURN 

9249 REM creepy evei 

9230 LET a=INT IRND*. 

9252 IF NOT a THEN I 

thing scuttles in a i 

TURN 

9254 IF a=l THEN PR 

flies past, screechii 

9256 IF a=2 THEN PR 

oot . " : RETURN 
9258 IF a=3 THEN PR 
ar a faint, unidenti 
nd echoing along the 



e passage behind you.": RETURN 
9280 RETURN 

9299 REM temple graphics 

9300 BORDER 4: PAPER 4: INK 01 C 
LS. 

9304 PLOT 0,20: DRAW 8,0: DRAW 8 
,-4: DRAW 232,0! DRAW 7,6: PLOT 
16,16: DRAW 0,41 DRAW 224,0: DRA 
W 0,-4: PLOT 24,20: DRAW 0,4: DR 
AW 208,0: DRAW 0,-4: PLOT 32,24: 
DRAW 0,4! DRAW 8,0: DRAW 0,4: D 
RAW 176,0: DRAW 0,-4! DRAW 8,0: 
DRAW 0, -4 

9306 PLOT 4B,32: DRAW 0,4: DRAW 
8,0: DRAW 0,96: DRAW -4,0: DRAW 



0,4: PLOT 90,32: DRAW 0,4: DRAW -16,-32: DRAW -S,-9: DRAW -12, -8 | 


-9,0: DRAM 0,96: DRAW 4,0: DRAW 


! DRAW 0,-12: DRAW 4,-4: CRAW 8, | 


0,4 


-4: DRAW 16,-4 


9307 PLOT 89,32: DRAW 0,4: DRAW 


9510 PRINT AT L6,9i ' : MMMMMI^M , 


9,0: DRAW 0,96! DRAW -4,0: DPAU 

0,4: PLOT 120,32: DRAW 0,4: DRAW 

-8,0: DRAW 0,96: DRAW 4,0: DRAW 


■"(AT I "*,<?; "■fiHE GOLDENH";AT 


I^HCHALICEMM" ; AT 20,9; "^■■^■B 


0, 4 


■■■v 


930B PLOT 136,32: DRAW 0,4: DRAW 


9515 PLOT INK 5i 128,88: DRAW I ( 


8,0: DRAW 0,76! DRAW 4,0! DRAW 


NK 5!0,16: DRAW INK 5;-4,8: DRA 


0,4: DRAW 4,0: DRAW 0,4: DRAW 4, 


W INK 5;8,0,-PI: DRAW INK 5; -4 


0: DRAW 0,-4! DRAW 4,0: DRAW 0,- 


,-8! PLOT INK 51124,104: DRAW 


80: DRAW 8,0! DRAW 0,-4 


INK 5S9,0 


9309 PLOT 56,132: DRAW 16,0: PLO 


9520 RETURN 


T 96,132: DRAW 16,0: PLOT 56,36: 


9600 PRINT ■*" According to lege 


DRAW 16,0! PLOT 96,36! DRAW 16, 


nd there" ' "existed, in the ancie 


0: PLOT 144,36: DRAW 16,0: PLOT 


nt temple" ' "of Ragadan, a golden 


184,36! DRAW 16,0 


chal ice. ° ' "Drinking from the ch 


9310 PLOT 176,32: DRAW 0,4: DRAW 


alice was "'" reputed to confer i ro 


8,0: DRAW 0,64! DRAW 4,0: DRAW 


mortal i ty. " 


0,4: DRAW 4,0: DRAW 0,-4: DRAW 4 


9602 PRINT '■ Unfortunately, ove 


,0: DRAW 0,-4: DRAW 4,0: DRAW 0, 


r the"' "centuries, the location 


-60: DRAW 8,0: DRAW 0,-4 


□f "' "Ragadan has become lost. On 


9312 PLOT 40,136: DRAW 96,0: DRA 


ly"'"the legends remain." 


W 0,4: DRAW -96,0: DRAlJ 0,-4: PL 


9604 PRINT '"Your guest is to se 


OT 4B, 140: DRAW 0,4: DRAW 3,0: D 


ek out the "'" temp 1 e ,' dr i nk the i 


RAW 0,4: DRAW 16,0: DRAW 0,4: DR 


mmor t al "'" draught , and return sa 


AW 12,0: DRAW 0,4: DRAW 24,0! DR 


f ely home. " 


AW 0,4: DRAW 4,0= DRAW 0,-12: DR 


9606 IF INKEY*="" THEN GO TO 96 


AW 8,0: DRAW 0,-4: DRAW 8,0: DRA 


06: CLS 


W 0, -4 


9607 CLS 


9314 PLOT 0,72: DRAW 16,16: DRAW 


9608 PRINT " INSTRUCTIONS" 


16,8: DRAW 8,2: DRAW 9,-2: DRAW 




8,-4! PLOT 72, B8 : DRAW 16,-8: D 


9610 PRINT ' "To move north, sout 


RAW S,-9: PLOT 112,60! DRAW 8,-4 


h, east, west up, or dawn, t yp 


I DRftW 9, -8: PLOT 120,56! DRAW 1 


• : " ■ "n, s , e , h , u , a " 


6,B: DRAW 8,8: PLOT 160,80: DRAW 


9616 PRINT ""The following verbs 


8,4: DRAW 8,0! DRAW 8,4: PLOT 2 


should be entered as single w 


00,92: DRAW 8,0: DRAW 32,-16! DR 


ords: " ' " look, wait, dismount. " 


AW 8,0! DRAW 7,4 


9613 PRINT '"The following verbs 


9316 FDR i=l TO 111 PRINT INK 6 


may also be" '"used, but must be 


SAT 5+i ,8! " l"[AT 5fi,13J"I": NEX 


followed by a noun :"' "open , t 


T i 




9317 FOR i=l TO 9: PRINT INK 6) 


ve, mount, drop, buy, climb." 


AT 7*1 , 19J ■ |- ! NEXT i! FOR i»l T 


9620 PRINT "You may also use exp 


7! PRINT INK 6jAT 9+1,241"!": 


ressions such as 'climb onto . 


NEXT i 


....'"'"This list is not exhaust 


9320 IF INKEY««"" THEN GO TO 93 


ive."'"You will have to discover 


20 


the"' "others yourself." 


9322 BORDER 7! PAPER 7: INK 0! C 


9621 PRINT "To see what you are 


LS ! RETURN 


carrying! i " 


9499 REM title graphics b instr. 


9622 IF INKEY*="" THEN GO TO 96 



9500: BORDER 0: PAPER 1: INK 6: 
CLS 

9505 PLOT 0,4B: DRAW 255,0: PLOT 
96,48: DRAW 16,4: DRAW 8,4: DRA 
W 4,4! DRAW 0,12: DRAW -12,8: DR 
AW -8,8! DRAW -16,32: DRAW -16,8 
: DRAW 112,0: DRAW -16,-8: DRAW 



9623 CLS 
9630 RETURN 
9989 REM dp. 



EY*="" THEN GO TO 99 
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THE 

DATA RECORDER 

DESIGNED FOR RELIABLE SAVING & LOADING OF COMPUTER DATA 
COMPACT SIZE 




meow 

micro/ 






50mm) 



HIGH RECORD LEVEL 
AUTO STOP 

OUTPUT CUT ON RECORD 

fUtcamaml) 



}. 5mm JACK 'LOAD 
2.5mm REMOTE 
3.5mm JACK'SAVE 
7 PIN DIN SOCKET 



SPECTRUM £24.95 




BATTER? 
OR 6V ADAPTOR 

ADAPTOR SUPPLIED 



ZX81 £27.95 

INCLUDING INTERFACE 



GUARANTEED FULLY COMPATIBLE 
WITH SPECTRUM & ZX81 OR YOUR MONEY BACK!! 



LOOK!! SUPER SOFTWARE ™e S pmc™ 



■Mvnra 



PURRRFECT VALUE tapes far each c. 



CX-oP^ 
Bar Billiards 



^i.T 



Battleships 



Slarbuster 



IPECTHUM (£3.50 each) 



2 SUPER GAMES 
ON EACH TAPE!! 



mxmt 



SPECTRUM 48K 

— NKWI1 w LOOK!! 
FISHVDICK 



ALL Tape Prices include Postage and Packing and VAT 

Data Recorder ADD £1.50 Postage, Packings Insurance 

Alio* 7 — 14 days for delivery 

Send cheques or Postal Orders only 

Overseas orders for software tapes only! (ADD £1.00) 



meow micro/ 

8 Newnham Close 
BRAINTREK, Essex CM7 7PR 
Tel: (0376) 22425 



(PROGRAMMING LANGUAGE! 



siogo 



a providing you w 
t of my LOGO p 
8K Spectrums, a 



program completed la: 



to it. Finally, save a copy of It 
completed program, then you' 
ready to RUN. 

New commands 

There are two additional con 

BACKGROUND (BG), which 
allows you to define the paper 



BACKGROUND 31 



David Nowotnik concludes his 

fascinating series on this adaptation of 

LOCO. 



LOGO ftg.1. The program listing 



DEFINE (DR. Most versit 
LOGO use TO instes 
DEFINE, but I've used the 

complete the DEFINE com 
with the new command i 
which must be different fr 
the commands curr 
available to LOGO. As an i 



D" , 6500 

6100 REM LIST 

6105 IF de*<l THEN RETURN 

6110 PRINT ttl;"LIST - To Si 






left of th 



mple, n 






DEFINE BOX (or OF BOX) 



;s for SET which start at 

the first two BACKGOUND co- 

BASIC PRINT AT. The third and 

BACKGROUND command are 
width and height of the square 



command BOX d 
'DEFiNE BOX' at 



*idth, a 



le full st 
is down. The 



o standard way of 
i are probably as 



125 IF z*="P" TH 

TO 61-10 ■ 

130 GO TO 6115 

140 CLS : PRINT 

L45 OPEN M2, "p" 

150 FOR j =1 TO d 



155 PRINT 

160 OPEN t« 

200 FOR j= 

205 CLS r 



NEX 



later on the same command will 






6213 


IF INKEYS=" " THEN GO TO 62 








15 




will be created with LOGO com- 


HP4L"FD40 HT903 




6220 


NEXT j : RETURN 


The other new command in 


and press ENTER. 




6300 


LET ed-j : GO SUB 5805 


this issue is LIST. It will list to 








LET y*=w*( j *n> 


screen or printer a LOGO pro- 










gram. But, as 1 haven't yet ex- 
plained how to create a LOGO 






6315 


GO SUB 5955: RETURN 


program, you won t yet have 


by LOGO; I've just at 




6500 


REM BACKGROUND 


anything to list 1 










Defining Logo 


make any changes. In 


er up to 


RET 


RN 


Commands 


longer than 28 charac 


ers. For 


r-z: 


RETURN 


LOGO programs are made be 










creating new commands from 


so we tell the comput 




6520 


GO SUB 12001 IF err>0 THEN 
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RETURN So, to EDIT the command 


(M-lfcliiNi „ 


6525 IF a<0 OR a>21 THEN LET er 


PATTERN, you will want to 


understand. The BBC machine's 




change line zero. Press 1 to get 


PROCEDUHE and the QL's DEF 


r-2: RETURN 


the EDIT option, and press to 


PRO also allow programs to be 


6530 LET rDH-a 






6535 GO SUB 1200: IF err>0 THEN 


you want to replace. Then enter: 


To start you off in LOGO pro- 


RETURN 


RP12[BOXRT30] 


listing, obtained by the LIST 


6540 IF a<0 OR (atcoll>31 THEN 




command. When entering a 


LET err=2I RETURN 


Press 5 lo exit the edit 


LOGO program, remember to 






enter one definition at a time 


6545 LET width"* 


mand DRAW to clear the screen 


(end each with END, which is 


6550 GO SUP 1200: IF err>0 THEN 


and reset the turtle, then try 




RETURN 


PATTERN again. 


the example program, notice 


6555 TF a<0 OR la*row)>21 THEN 


LOGO Structures 


LET err=2: RETURN 




that the command SCENE is the 


6560 LET height=a 


By now you should already have 


command which uses all the 


6565 GO SUB 1200: IF err->0 THEN 


built upin LOGO. Each definition 


tion. It is the command which is 


RETURN 


should be quite independant; 


central to the operation of the 


6570 IF a<0 OR a>7 THEN LET err 










program (when it's all in the 




This is structured programming. 


computer) by entering the direct 


6575 FOR i=row TO row+height 


It has the advantage of being 


command SCENE. In this way 


6580 FOR j'LQl TO cal+width 


easier to follow what is happen- 


LOGO differs from BASIC. Its 


65B5 LET at =22529*32*1 +j 


tured' BASIC), so it should be 


single RUN command; they start 


6590 LET 1 1=PEEK at 




with a defined command which 


6595 LET lk=INT (11/8)! LET 11=1 


Programs written in this way are 


is the 'core' of the program. 



6600 POKE at,ll+8*a 
6605 NEXT j : NEXT i 
6710 RETURN 



flg.3. An example LOGO program 



31 5 5 



definitions already defined com- 
mands. As an example, define 
anothercommand PATTERN, as 



• Option 1 is EDIT. I 
allow you to change a line, 
the line number of the lini 
wish to change, and re-enti 

• Option 2. INSERT a 



DEFINE PATTERN 






BPSfJOX RT45] 




Remember, you cannot 

lessinyour definition. If 


PATTERN as a direct cor 






you'll get a pattern ba set 


















ed MOVE whichalso use 


BOX. 


• DELETE (option 3 


Define the command as 






than enter MOVE as t 




• REMOVE (option 


command. This riyfrnii o 


n usee 


remove the whole de 



PU XY 40 

1 SX 42 PU : 

2 SX 44 PU : 

3 SX 45 PU : 

4 SX 45 PU : 

5 SX 44 PU : 



59 PD 
58 PD 



Editing commands 


DEFINE MOVE 




PUXY50 PD BOX 




PUSX120 PDBOX 




PUSX 190 PDBOX 






command EDIT. The syntax is 




EDIT PATTERN. Once you have 


F>g.2- Dafin/tion of the 


entered this command, the com- 


command MOVE 







- HOUSE 
: 5 5 2 



BG 22 13 



ZX COMPUTING 



■PROGRAMMING LANGUAGE! 



PL' 



16 



96 PC 

PD SH 43 FD 33 RT 90 FE 33 
(inition - SCENE 
SKY SUN 
GROUND TREE 

HOUSE ROOF DOOR WINDOWS 
PU XY 203 160 SH 180 



Definition - TREE 

S PU XV 80 100 PC PD 

1 SH 90 RP 8 [ FD 7 LT ■ 

2 FD 2 

3 RT 90 FD 30 LT 90 FD 

4 LT 90 FD 30 RT 90 FD 

5 RT 90 FD 30 



o LOGO 




about LOGO there are several fascinating [ 

good book available (for exam- LOGO is able 

pie LOGO Programming by Peter traduction lo 

Ross). Despite the limitations ot young and old 

my program, I hope you have easy to use i 

gained an insight into the package. 




perftclfw roboOo jtoiwisj ma<h;.\<K«;r 



Spiio ifoei n I 

„,„Huit»no,ind ■■'•""■ 



ye.w a software upyr&le vA 
Orda (he spectrum f OB r K 10 Csilr dgc 



i i i i i i i cgr 



SPECTRUM FORTm/0 CARTRIDGE 



HORNBY 
SOFTWARE 

SPECTRUM 

PRO GOLF SERIES j £$ 

NEW ERA IN COMPUTERISED GOLF 



EXACT SIMULATION OF BRITAIN'S TOP GOLF COURSES 

(1) ALL GOLF RULES APPLY 

(2) DESIGNED FOR ONE OR TWO PLAYERS 

(3) PLAYED OFF ANY HANDICAP 

<4) ON EACH HOLE DIST, PAR. GREEN ENLARGEMENT 

(5) CONTROL SHOT - CLUB. STRENGTH, DIRECTION^ 

SHAPE OF SHOT 

(6) GRAPHICS EXCELLENT 
(7| EXTREMELY REALISTIC 



NEW BIRKDALE 40K 
LINDRICK 4BK 

WENTWORTH — EAST 8 WEST I 
MOORTOWN Scene ol Aral 1964 In 
9 HOLE SIMULATED COURSE 

ALL PRICES INCLUSIVE OF VAT. F 



HORNBY SOFTWARE 

21 PINFOLD HILL, LEEDS LS15 OPW 
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- 



■programming feature! 



Light Screen 

Designer 



Toni Baker completes the 
structure of our Spectrum 
graphics package, and 
describes the cursors 
generated by the program 
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■PROGRAMMING FEATURE! 







ORG DDB6 












OR_CUBSOBS 


PUSH DE 














LD HL.OBIGIN 












ORIGIN. 












LD8.03 












DCS LOOP 


PUSH BC 














LDE,(HL) 














INCHL 














LD D.IHLI 












INCHL 














LD C.IHU 


C: = column 












INC HL 














LD B,(HU 










23 




INCHL 














LD A,B 




nber, ar EF if c 






1-EF-F- 




CPFF 










2806 














E5 




PUSH HL 














EX DE.HL 


HL: = addres 








E1 


DCS CONT 


CALL DD6C,DR CUBSOR 
POPHL 


Draw spec if i 


nextvariable 










POPBC 














DJNZ DSC LOOP 










C9 




POPDE 


Leave origins 


DE unaltered. 






BET 


Rovtint id drain each ol the three 


ursors ORIGIN. 


MARKER and C 







DBOC to DBOF, MABKER from 
DB10 to DB13, and CUBSOR 
from DB14 to DB1 7. This next 



DR_CURSOB 



calling the 
program 



gram may tie run simply by call- 


used for two entirely different 


self -consistent (that is - if Htl 








STABT address. In hex, this ad- 


to CONTINUE with a picture. 




dress is DDD5, but by an ah 












[what?l the START address in 


ween BASIC and machine code 












a BASIC CLS instruction is need- 






ed before a new picture is 




call upon "Light Screen 




DBO0 and DB3F. Watch hoi 








this program you have nothing 


between the two different 




to remember except 56789. 










Figure One in order to follow tht 



the program. The 


whole pro- In fact 


USB 56789 can be 


with, none 


of the cursors will be program through. 


Complete program n 


rOeHaation Itlbmjtme 


ORG DDD5 




Idecimal 56789] 


CDCCDC 


START 


CALL DCCC.MESSAGE 




01 




DEFB01 




Print message "Light Screen Designer". 


DD2140DB 




LD IX.DB40 






CDB016 




CALL16B0.SET_ 


Mm 


Maximise spare RAM space. 


2100DB 




LD HL.OBIGIN2 




Point HLto first program variable. 


0610 




LD B, 1 






C5 




PUSHBC 






5E 




LSD LOOP 




LD E,(HL) 


23 




INCHL 






56 




LDD.IHL) 




DE: = address of cursor, if assigned. 


23 




INCHL 






IE 




LD C.IHU 




C: = column number of cursor, if assigned. 


23 




INCHL 






46 




LD B.1HLI 




B: = row number of cursor, if assigned. 


78 




LD A,B 






FEBO 




CPSO 






300A 




JB NC,LSD_RESET 


Jump if row number out of range. 


E5 




PUSH HL 






CD41D0 




CALLDD41,PIX_ADDR 


HL: = address corresponding to row and column 












A7 




AND A 






fcD5 2 
El 




SBC HL.DE 
POPHL 




Set zero flag if this address matches to the one 
HL: points to byte four of program variable. 


2802 




JRZ,LSD OK 




Jump if cursor position is already assigned. 


36FF 


LSD RESET 


LD (HL).FF 






23 


LSD_OK 


INCHL 




Point to byte one of next program variable. 


C1 




POPBC 






10E3 




DJNZ LSD_LOOP 




Repeat for all cursors. 


70 




LDIHLI.B 






2 3 




INCHL 






70 




LD |HU,B 




Reset (J FLAGS). 


210FDB 




LDHL.ORIGIN + 3 




HL: points to byte four of (ORIGIN). 


CDA3DD 




CALLODA3,RES_ 


CURSOR 


Reset origin-cursor to 0,0 if not in use. 


2E17 




LDL.17 




HL; points to byte four of (CURSORI. 


CDA3DD 




CALLDDA3,RES._ 


CURSOR 


Resat main-cursor to 0,0 if not in use 



X COMPUTING OCTOBER/NOVEMBER 1 ! 



■PROG RAMM ING FEATURE). 



FE20 
20F8 
CD6EOD 



CALL KEY_SCAN 

LDA.E 

CP20 

JB NZ,LSD_READY 

CALL OD6E.CLS_LOWER 



\: = key code ignoring shift. 

il "ESCAPE" key pressed. 



3 program 

j lake a look at 



screen whilst waiting ft 
to be pressed. Once a 
detected th 



ir though, is the fact that the 

. However, the "shitt" key ac- 
hates a repeat facility for the 
>r keys only. Can you < 



returning to BASIC. I 









ORGDE1B 




CDB6DD 


MAIN 


_LOOP 


CALL DOB6.DR_CURSORS 




CDB5DC 






CALL DCB5.GET_CHR 


DE: = keyboard scan. 


CDB6DD 




_LOOP_2 


CALL DDB6.DR CURSORS 




2A14DB 






LD HL.(CURSOR) 




ED4B16DB 






LDOE,ICURSOR + 2) 


BC:= co-ordinates of cursor. 


D5 






PUSH DE 




7B 






LDA.E 


A: = key code ignoring shift. 


FE03 






CP03 




2853 






JRZ.CSR DOWN 


Jump is "cursor down" pressed. 


FE04 






CP04 




2840 






JR Z.CSR LEFT 


Jump if "cursor left" pressed. 


FEOB 






CPOB 




2846 






JRZ.CSR_UP 




FE13 






CP 13 




283D 






JR Z,CSR_RIGHT 


Jump if "cursor right" pressed. 


DDCB0166 






BIT 4, (J FLAG SI high 




2014 






JR NZ,ML_ACTION 


Jump unless screen requires copying. 


210040 






LDHL.4000.D FILE 




1100C0 






LDDE,COOO.D_FILE_2 




01001B 






LDBC1BOO 
LDIR 


Copy screen. 


210CDB 






LD HL.DBOC.CURSOR 




1100DB 






LD DE,DBOO,CURSOR_2 




4D 






LDC.L 


Note: BC:= OOOC. 


EDBO 






LDIR 


Copy cursors. 


01 


ML_ACTK 


POPDE 


DE:^ keyboard scan. 


211 BDE 






LDHL,DE1B.MAIN_LOOP 




E5 






PUSH HL 


Force subroutine return address to be 
MAIN_LOOP. 


2142DB 






LD HL.D842.CMD ADDRS 
INCD 




2803 

El 






JR Z,MI CASE 

POPHL 


Jump unless "shift" pressed. 
Balance to stack. 


1839 






JR RET BASIC 


Prepare to return to BASIC. 


7B 


ML_CASE 


LDA,E 




B7 






ADD A.A 




85 






ADD A,L 




6F 






LDL.A 




4E 






LDCIHLI 




23 






INCHL 




46 






LDB.IHLI 




C5 






PUSH BC 


Stack: = subroutine address. 


2A14DB 






LD HL.ICURSOR] 


HL: = main-cursor address. 


ED4B16DB 






LDBC.ICURSOR + 21 


BC: = main-cursor co-odinates. 


C9 






HET 


Call required subroutine. 


CD13DD 


CSFt_LEFT 


CALLDD13,LEFT_PIX 


Move cursor left. 


1B0D 






JR CSR STORE 




CD1FDD 


CSFL 


.RIGHT 


CALLDD1F.PIX RIGHT 
JR CSR STORE 


Move cursor right. 


CD29DD 


CSR_DOV\ 


CALL DD29.DOWN._PIX 


Move cursor down. 


1803 






JR CSR STORE 




CD36DD 


CSR 


_UP 


CALLDD36,UP PIX 


Move cursor up. 


3805 


CSR_STORE 


JRC.CSR EXIT 




221 4DB 






LD(CURSORI,HL 




ED4316DB 






LDICURSOR + 21.BC 




D1 

14 


CSfl_ 


.EXIT 


POPDE 
INCD 


DE: = keyboard scan. 


2887 






JR Z,MAIN_LOOP 


Loop back unless "shift" pressed. 


CBD8DD 






CALL DDB6,DR_CURSORS 




76 






HALT 




76 






HALT 


Wait for 1/25 of a second. 


CDCODC 






CALL DCC0,GET_CHR__2 
JRMAIN LOOP_2 


DE:= keyboard scan. 

Loopback. nrinprngrmmhop. 
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Returning to BASIC 



may alternatively reply "N" ot 
"escape"). Incidentally the 
RETURN TO BASIC option 



this up, you should POKE ad- 
dress DB82 with A4, and ad- 
dress DB83 with DE. This effec- 
tively stores the address of an 
I RETURN TO BASIC 
amongst the COM- 













RET BASIC 


CALL DEA4.ESCAPE 








JPDE1B,MAIN LOOP 






ESCAPE 


CALL MESSAGE 








DEFB 12 
















RETNZ 


















Return to BASIC. 






M~~— «• 


•d comply with a RETURN TO BASIC mquest 
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I SPECTRUM UTILITY I 



Block 
Delete 

C+an PnHnore cant thic rnnfino all (-ho 



irogram. Now key in GOTO 3 



numbers which y 



Stan Rodgers sent this routine all the 

way from Switzerland, and it's worth 

Yodelling aboutl 



Fed that although it's short 

ryes to be shown in all it's 

tan was already working on 
this when we published Rodney 
Francis' version in the DECAJAN 
issue, and he says that he 
thought that the yersion only did 
" the )oe, since the user still 
o delete one line by hand. 



everyone would have realis 
excuse, waffle, blush .... 

Anyway, ovei to Stan w 
will explain how to operata I 
Block Delete. 

Stan say's... 



ie deleted 



at 6510h to get 
and then again t 

to be deleted. These 
:it6629h 



les a simple, compact, easy tc 
a way of deleting blocks ot 
jrce lines from e BASIC pro 



d SAVE it. Lines 4 



addresses ar 



comprise tl 



hkh 



value of BIT 7 is 1 , except . 
issue 3 Spectrums when it is 
usually (but not always) 0. This 



Key in 'GOTO 4 ENTER' 
and the machine code is POKE d 
into memory locations 23300 
onwards (this is in the PRINTER 
bufferl. If the flashing message 
Checksum error' is displayed, 
you have probably made a 
mistake in the DATA statement 
at line 6. Check it carefuly, cor- 
rect the error and key in 'GOTO 
4 ENTER' again. When correct, 
the message "DELETE loaded" 



Key in 'GOTO 1 ENTER' a 



deleting. Key in '4 ENTER' s 



w save the BASIC 



Fig. 1 BASIC mock Oelel 


routine and loader 


1 


INPUT "Delete Ifon line " ; * 


i " to 


line ■ 


f. IF f<3 OR t>9999 


OR + 


>t THEN 


GO TO 1 


2 


POKE 23296, *-256#INT ft/256 


>; POKE 23297, INT I -f/ 286)1 POKE 


2329E 


, t-256* 


NT (t/256> T POKE 23 


299, INT (t/256): RANDOMIZE USR m 


em: STOP 




3 


-ET mem 


23300: LOAD 'delete 


cade" 


:0DE mem, 20: GO TO 1 


4 


.ET mem 


23300: LET cs=0: RE 


STORE 


6: FOR 


i=0 TO 18: READ v: 


POKE 


iraem+i ) 


v: LET cs=cs*v: NEX 


T i : 


READ tsvl IF csvOcs THEN 


PRINT 


FLASH 


1 i ' Checksum error " : 


STOP 






5 


PRINT "Delete is loaded": 5 


TOP 






6 


DATA 42 


0, 91, 205, 110, 25,229 


,42,2 


,91,35,205, 110,25,209,203,2 


29,25 


,201 ,20 


1 


Fig. 2 Saw 


ce-code/Macth 


necodo disassembly far Slock 0*h, B 


5B04 


2A005B 


LD HL, (5B00» 


3B07 


CD6E19 


CALL I96E 


5B0A 


E5 


PUSH HL 


5B0B 


2A025B 


LD HL, <5B02) 


5B0E 


23 


INC HL 


5B0F 


CD6E19 


CALL 196E 


5B12 


Dl 


POP BE 


5B13 


CDE319 


CALL 19E3 


5B16 


C9 


RET 




£6.95 in*, vat 



'Z^Vr^'Z, 1^,"" C '"" 9 £8.95 inc VAT 

MAPOFU.K 

£11.95 mc VAT 
HISOFTPASCAi-vw-^.ft**^ 

[f,30MB»™w " £25.00 inc. 



ZEN EDITOR/ASSEMBLER 



HORSE RACE FORECAST-^,™,, 



-<3S» I'HON E NOW (073 57) 4335 
!SS or SEND FOR DL T AILS>«^ 



| NFWBRAIN 



" , ' M ! SPECTRUM 5olW a : 



NOW READ THIS! 

It's your chance to become a 

programmer for a friendly, 

dynamic new company! 



We are currently looking for additional pro- 
grammers (and games) to add to our team. 
The benefits include, the chance to work on 
a wide range of projects, the chance to pass 
opinions and present suggestions on other 
ideas within the company, financial help 
with equipment, and, of course, an excellent 
royalty rate. 

(Your chances will he improved if you can 
send us examples of any of your program- 
ming. If sending us games please give a 
brief description of the object of the game, 
time taken to program and any other infor- 
mation you may feel to be relevant. As well 
as a cassette, of course.) 

Please apply in writing only to: 
LISA VALLMER 

THE PROGRAM BUREAU 

Chrshum Huusr, 136 Kcgon! Street, London W.l, 



It's easy 

to complain about 

an advertisement. 

Once you know how 



One of the ways we keep a check on the 
advertising that appears in the press, on 
posters and in the cinema is by responding to 
consumers' complaints. 

Any complaint sent to us is considered 
carefully and, if there's a case to answer, a full 
investigation is made. 

If you think you've got good reason to 
complain aboui an advertisement, send off 
for a copy of our free leaflet 

It will tell you all you need to know to 
help us process your complaint as - 

quickly as possible. / 

The Advertising Standards Authority W 

If an advertisement is wrong, we're here to put it right. 

ASA Ltd. Dept 1 Brook House, 

TorringtoTi Place. London WC1E 7HN 



I PROGRAMING TECHNIQUE! 



Here be dragons 



. m dventu.e games a.e 
^k often most difficult to 


some pointers on how to produce that 


^r^* write. It is relatively easy 


adventurous masterpiece from 


game: here you are only con- 
cerned with trying to get your 


Glaswegian demon-destroyer, 


whw it todo. With an adventure 


Brian J. Robb. 


program you are dealing with 
people. Your program must ap- 








If you note down ideas tor a a solid visual representation of ming as soon as you have an 


frrandly ' . It has to be able to 


while one day you may find you your fantasy land. idea, without any planning, but 


cops with all sorts Of input from 


have several which fit together When the map is finished you all this will result in is a bug filled 


a frustrated adventurer. 


well to create an adventure must 'stock' it with items, shambles of a program. 


There are several ways of 


scenario. monsters and characters. On An adventure program can 


writing an adventure program 


your map list the items to be be put together as a series of in- 


but they all begin the same. The 
programmer must have a good 
idaa for an adventure and a plan . 


SCenanO shadows. You should also list variables to be used throughout 


This is often the most difficult 


any special conditions to be met the program should be made and 


part of the whole process. The 


Once you have your scenario before a monster can be killed or the variables should be initiated 


best place to get ideas is from a 




video range of source material 


draw a map. Maps are an impor- shown in figure 1 , gram. This makes up one 


This mainly consists of Science 


tant part of adventure game Only when all this has been module. The second module 


Fiction and Fantasy books. The 




most widely used are those by 


idea of where each location is, keyboard be approached. It is for the game. The variables are 


Toikein. Put there is a wide 


not just an abstract thought but very tempting to begin program- shown in figure 2. 


range of books which can offer 






















which are rarely touched such 








and Tanith Lee Many of the 
















authors can provide bniiient 




-*-*- 


EXIT WEST 






Be seeing you... 
















Another, more widely used 












source, are television program- 












mes and films. T.V. program- 






ROOM 5 


















Doctor Who are good starling 
points to collect ideas. Many 






DRAGON -ONLY KILLED WITH 
GOLD SWORD. 






Video release, are good sources 












Krull. Dark Crystal and Science 






PILE OF TREASURE TOO MUCH 










TO CARRY UNLESS IN CHEST 






the Jedi provide ideas for events 












and locations within your own 






EMPTY CHEST 






Ma gaz ine a d vert is me nts al so 












provide ideas. The graphics 












displayed in an advert can spark 
























characters within an adventure. 












adventure fame's' ' can provide 






TUNNEL SOUTH 






ideas. If a game is for a computer 






FOUNDWNEN 






on descriptions in adverts and 
revie ws in co mpute r maga z in e s , 






CHEST MOVED 










* 




your own version of the game. 






t 






The majority of ideas come, 
mixture of all those mentioned. 






I 






ffcw 


t«^— «- 


► 
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4* 



I PROGRAMING TECHNIQUE | 



1 LET S = 


This is t 




t erss t 


ength 


20 LET IQ 


= 100 This 






telligence 


30 LET M 


This is I 








40LETTF 








50LETAS 


= "WhatNow?"/ 






60 LET L = 


3 The loca 








70 LET N = 


The nurr 


ber of it 


ms r.n 


ried. 


figure 2 Se 


ling up the 


a ,» fl fes 







300 REM MONTEflS 

310IFM = 1 THEN GOSUB 6000 

315 IF M = 2 THEN GOSUB 6010 

Etc., 

6000 PRINT "YOU SEE A DRAGON" 

6006 RETURN 

6010 PRINT "YOU SEE A ZOMBIE" 

601 5 RETURN 



600 REM TAKING 

610 PRINT "WHAT DO YOU WiSH TO TAKE?" 

620LETN = N+1 

630 INPUT LSIN) 

640 IF N =5 THEN PRINT "YOU ARE CARRYING TOO 

MUCH.DROP AN ITEM." 

650 PRINT "YOU MAY CONTINUE" 

660 GOTO 1000 
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A full feature adventure 


'^■nim 


starring well known 
nasty aliens the Zarps. 
Can you play the hero 

blow up the earth 


Ss 


m 




frffl 


-..k;, 1 ;^. 


sS^."™^ 



£9.99 

FREE 

RULE 

BOOK 



FOR THE 
SPECTRUM 48K. 

CBM64 



Starring The Zurgs 
After a desperate space 
Battle only one fleet of 
heroes temaii 
pteventthe invasion of 
earth. The future ol 



01 SPECIAL 



Moving Graphic! 
On The QL 

Drive a racing car around the screen in 
this fast-moving game from Tim Hartnell, which 
demonstrates how effectively SuperBASic can be 
used for moving graphics. 




Drlu 


e a racing car around the 




(which looks 


Games Compendium (Interface 














elso to the 'difficulty leve 














demonstrates how effectively 










Supers A SIC can be used for 


although it 


starts off running 










fairly slowly 


is almost impossi- 






Although the speed of the QL 


ble to play, II 






















sibla to produce highly 




"II speed up, and 


edge to your starting position. 




satis factory moving graphics 






where you'll be given a new car. 


The clock, and the score, is jf 


programs as vou 'II see when you 


speed for tw 




Vou must avoid all the edges to 








The prog 










QL RACER you drive a little 


from my boo 


Tim Hartnet/'s QL 


related to how long you manage 




3* 


difficulty*?! 






B ;£:;*E;;-;;;;;;; 
























200 AT nr <*..»!>, car acrt? 




60 


'iPiil 






•20 print ~*~ 

230 beep 1si.hhd11 to 201 












270 AT car dOY.r,,car across 




BEEP 1000.RHPI 24i." 












Fw FM*i£i.r° ai * 


ICUltf 




290 EHO FOR 1 




E2 
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QL SPECIAL 



it.* EHO DEFlr. 



tt(200> THEN 



91* £HD IF 

94* uitf*-nen* 
»J# MP DCFint 



t PAPER ffij 
I FOR fl ! 

' EHD OEFir 



',25, 14, 2b, 14, 3H 



PAPER 71 INK 2 
1*1* AT *,3», PRINT "Scorn" 
1*4* AT 4,32-PRIHT " -fdiYfic 
1*5* D1H t(23ZJ,bt233l,c(2e,; 
1*6* RCHtrk Build rmcttrack 
1*7* PAPER tilHK 4 

CSIZE 2,9 

RESTORE 



1840 PAT A ■> 



ZX81 CAME 



Tower of 

Hanoi 

Kenneth Baker of 
Southampton has written 
the ultimate version of 
this game in machine 
code for the 16KZX81. 



ago by the French mathemati- 
cian Edouard Lucas, The Tomer 
of Hanoi is perhaps the most 
fascinating and enduring of all 
puzzles. The object is to transfer 
the si« parts of the Tower from 

without ever placing a larger 
block upon a smaller one. Posi- 
tion 'B' is used throughout as a 
temporary store. 

Totransferablockfrom'A' 
to 'B', simply input AB. If the 
move is valid the transfer will be 



badly that 
call a rest, 
Restart can 



The program is writ 
irely in Machine Code. 



ejected with a reques 



pairs are NOT instruction 

Making space 



■ hence the apparently 
it REM in Line I 4 of the 
. which must be left ta- 
rn the HEX LOADER is 



1 REM 

2 SLOW 

3 RAND USR 

4 REM I 



14 REM 

15 POKE 16541,232 

16 POKE 16542,4 

17 LET Z=16544 
IB LET V=2B 

19 FOR N-l TO 139 

20 LET T=N 

21 LET C=l 

22 DIM A»(33) 

23 DIM A(9> 

24 PRINT AT 18, Bj "INPUT LINE 
i. "jN 

25 INPUT A* 

26 FOR M=l TO 25 STEP . 

27 GOSUB 5B 
26 LET A(C>=P 
29 LET T=T+P 
3B LET C=C + 1 

31 NEXT M 

32 GOSUB 50 V^ 

33 LET Q=P 

34 LET M=M+3 

35 GOSUB 50 

36 LET P=236»Q+P 

37 IF NOT P=T THEN GOTO 39 
3B GOTO 43 

39 PRINT AT 18, 0j "ERROR IN LIN 
"|NlAT 19, B; "PLEASE RE-ENTER" 

40 PAUSE 100 

41 CLS 

42 GOTO 20 

43 FOR M=l TO 9 

44 POKE Z,A(M) 

45 LET Z=Z + 1 

46 NEXT M 

47 NEXT N 

48 PRINT AT 18,0; "ALL CORRECT" 

49 GOTO 54 

5B LET I=CODE A*(M)-V 

51 LET F=CODE A*(M+1)-V 

32 LET P»16#I+F 

33 RETURN 

54 PAUSE 10B 

35 CLEAR 




lines. To avoid 
s. the odd byte 



your own programs 

be found by using 
UC + 6)/L]-6 whe 



:elC + 6). again at 
yte until a convei 
i reached. The le 



■uccessfully entered, lines 1 5 I 
i5canbe removed, andthefiru 
nstruction. before saving am 
unning the program, is to POKI 
6543, 127:this will make tru 
<EM statement invisible, bir 
an be omitted if my flair fo 
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ZX-81 OWNERS 



AT LAST 

THE PROGRAM YOU'VE 

BEEN WAITING FOR! 



Rocket 
Man 



1 



with 
Hi-Res Graphics 
on standard ZX-81 16K 





Get rich quick by collecting Diamonds rhat are 
simply lying there waiting (or you! 
Oh ... ] forgot to mention that there are one or 
two problems! There is an expanse of Shark 
infested water between you and the Diamonds, and a 
strange breed of Bubble that seems hell bent on 
getting you in it! Somehow you must cross it. . , . 
You have a Rocket Pac to help you (a Vulture on 
higher levels) hut you must rush around the platforms 
and ladders collecting cms of fuel (legs of lamb with the 
Vulture) .11 ii( cursing thai weird Bubble. Once you have 
■nough fuel then it's Chocks Away! 

Oh . . . but don'l run out of fuel on the way - otherwise it's 
.SPLASH! 



The aim is 10 culled allihe 
diamonds from the iar left hand 
side ol I he screen, whilst avoiding 
the rampanl Bubloid. These 
emerge from the sea and tire hell 
bent on reluming to their watery 
habitat with you in low. Sooner or 
later you are going to end up in the 
drink - The idea is to make il later! 

By belting round the system of 
pint form sand ladders, cleverly 
avoiding I he Bubloid. you collect 
I he fuel cans which appear in 
random positions, until unu 
consider that your fuel gauge 
indicates sufficient in Ihe tank. 
No* you ran go and collect your 
rocket. Wilh the rocket -pack 
strapped to your back you can fly 



There are six stages with six 
(lilfereul pl.ilfunn layouts On 
stages l-3lheBiihl<>id which 
floats in front of the platforms 
with uncanny ease, gets an ever 
increasing ability tonome in on 
your position, making Ihe task of 
staying alive more demanding 
with each stage. On stages 4-6 
you once again start with the 
easiest Bubloid (which is a blessed 
reliel 1 ) but the fuel cans are 
K'pl.wii by legs of lamb which 
you must collect to feed your 
vulture, and once il has enough 
energy (or you think it has 1 ) you 



■sthev 



stheei 



teofst 



(.itlk'L-i tile diamonds . . . but 

don't run out of fuel or y< mv 

rocket-pack will simply 

disappear and you will 

wind up in the drink! 



tonds. 

'"iONLY 



GOOm.UCK' 



Available from all good computer shops 
or send cheque/P.O. for £5.95 (inc P&P) to: 



Software Farm, FREEPOST <,«,„ 
(BS3658) .BS8 2YY 



ZX81 CAME 



Pot Shot 

indulge in a little 'fowl-play and avoid 
the gamekeeper with F A Slade's Pot Shot. 



A simple but ni 
taining game presented in tw< 
forms. Firstly a BASIC listini 
which plays perfectly adequate 
ly and then for comparative pur 
poses try the Machine code ver 
sion. The Basic program u 

To enter the machine cocf» 



the Machine code driver lines 
then SAVE your program. 
Although the code is checked on 
entry there is still a slight chance 



Program Description 



al of the bullet position loop. 



Input each of the ni 



been entered you may delete all 
the lines except 1 REM or leave 
them, the choice is yours. Enter 



haveendeavouredto 

reasonably accurate 

in BASIC. Any 

bullets. 

The object is simply to score 
as many points with your limited 
as possible. Set 



i competition ai 
or ages I 



10 CLS 

20 DIM A«!3,32) 

25 FOR 1=1 TO 6 

26 LET A*!l, !I-1)*5+1 TO > = " " 
*CHR* 129+" "+CHR« 1 

27 LET A«!2,I#5-2)«>CHR« 128 

28 NEXT I 

50 PRINT AT 1,0;A*(1, TO ) | A* I 
2, TO )!A*(3, TO M* "IA«(1, TO 
3D J" -|A«'2, TO 31))A*!3, TO )| 

■|A*I1, TO 30J ; " "|A»(2, TO 
30) 

60 LET A=PEEK 16396+ !236*PEEK 
16397! + 775 

70 POKE A, 128 
B0 POKE IA-33) ,135 
90 POKE (A+l) ,5 
110 POKE 
120 POKE 
130 POKE 
140 LET i 
130 LET A-PEEK 16515 
160 CLS 
170 PRINT AT 5,51" YOUR SCORE 

"lAJAT 6,31" "| 

AT 13, 51 " ANOTHER GAME (Y/Nl ? 
1B0 LET B*=INKEY« 
190 IF B«="' THEN GOTO 180 
200 IF B«="Y- THEN GOTO 10 
21.0 STOP 



290-300 
325-330 
340-370 



Si t 






Checks D for restarting print position, 
checks if bullet fired or key pressed. 
Checks no bullets to end game. (May b 
changed I. 
Prints score and asks if another game r< 

Sliirl :il iK.llct ifi-il fin: ! l(JOU 

Adds bullets fired if loop just started. 

Clears old bullet prints new builet. 

If bullet is not near ducks, jumps past h 






Checks if hi 
Increments bullet pi 
Hit duck . . clears AS of duck 
1340-360 Iprints splat (362-368>. 
score (370) 

Resets A for hit (head or bodyl 
Delay loop 
J, Clears bullet 




PRINT 'ERROR R 



THEM GOTO 305 
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34 





£2 


2 


130 


95 


343 


58 


131 


6 4 


131 


50 


131 


565 


64 


205 


2d 


£5 


225 


24 


609 


202 


54 





229 


35 


54 


574 


27 


24 


245 


58 


37 


£4 


4=55 


254 


255 


40 


21 


42 


12 


£24 



53 


35 


54 


49 


280 


38 


35 


54 


57 


273 


23 


205 


155 


65 


537 


65 


62 


7 


225 


719 


35 


61 


32 


250 


4 32 




5 


32 


248 


193 


4 


197 


205 


253 


132 


64 


2 54 


10 


205 


155 


65 


205 


193 


3 


32 


235 


64 


24 


228 


193 


197 


6 


4 


197 


65 


205 


155 


65 


32 


245 


2175 


133 


13 


32 


235 


201 


131 


64 


128 


50 


201 


28 


28 


28 



343 
928 
263 



636 
614 

753 











































68 


77 


3 


126 


30 


1 3S 


454 












10 








26 LET A« ( 1 






3 




32 


249 





38 


363 


i-CHR* 129*-- " 


emu 




130 


64 


1 19 


35 


35 


29 


412 


27 LET fl«(2 






32 


230 


47 


12 


64 


1 


381 








48 





9 


22 


8 


68 


155 


50 LET A* (4 


TO 




77 


3 


126 


254 


27 


40 


527 


O 31 1 






8 


1 


33 





9 


21 


72 


60 LET A«'5 


TO 


1 =" "»A*!2, 1 T 


32 


241 


201 


10 


254 


129 


867 


31) 






40 


a 


254 





40 


37 


379 


70 LET A* i.7 


TO 


) =" "*A*( 1, 1 


54 





24 


235 


54 





367 


TO 30) 






229 


35 


34 





35 


35 


388 


B0 LET A* (8 


TO 


)=" "*A«-2,1 j 


54 





'■ 


32 


" 


* 


96 


TO 301 ■ 
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19B4 










67 



90 LET A = 271? 


PRINT AT (I+l> ,Ei " "iAT I,B 


92 LET B=0 






94 LET C=0 


260 


IF I>8 THEN GOTO 320 


100 LET D«2 


290 


IF PEEK ((PEEK 16399*256) *P 


110 LET E=15 


EEK 


6398-511=0 THEN GOTO 320 


120 POKE <<256*PEEK 16397) *PEEK 


300 


IF PEEK I (PEEK 16399*256) + f> | 


163960-12) , 151 


EEK 


6398-51) < >129 THEN GOTO 380 


130 PRINT AT l,0iA«'l,D TO 1 i A* 


310 


SOTO 340 


11, TO D-l)iA«(2,D TO )|A*£2, TO 


320 


NEXT I 


D-l)|fl«fJ, TO ){ft«'.4,D TO >;A*( 


323 


LET A-A+4 


4, TO D-1>!A*(5,E TO )1A*I5, TO 


330 


IF A>16 THEN LET A=0 


D-l)iA«(6, TO )IA*(7,D TO ) J A* ! 7 


335 


GOTO 180 


, TO D-l.'iA*(B,D TO IjAtlB, TO D 


340 


LET A«'I-1,E+D-1- I <D>16)*32 


14.0 LET 1=DH 


330 


LET A«(I-1,E+D+1- 1 (D>15)*32 


130 IF D>=33 THEN LET D=2 






160 IF ! IMKEY«< > M " ) OR <A>0) TH 


36C 


LET A«(I,E+D- ( (D>15) *32> >=" 


EN GOTO 250 






170 IF IMKEY«<>"' THEN GOTO 250 


362 


LET F-<!FEEK 16399*256) +PEE 


180 IF B<10 THEN GOTO 130 


K 16399-21! 


190 CLS 


363 


LET C«--**SPLAT** n 


200 PRINT AT 2,5S"Y0U SCORED "J 


364 


FOR J = F TO FtlLEN (C«)-l> 


CI" PQINT5";AT 7,5; "ANOTHER GAME 


367 


POKE J, CODE (C«(J-F + D) 


iv/ni ?■ 


7-6B 


NEXT J 


210 IF INKEY«="" THEN GOTO 210 


370 


LET C-C + (12-1) 


230 IF INKEY*="Y" THEN GOTO 10 


300 


LET 0=0 


210 STOP 


3B3 


FOR J-l TO 20 


250 FOR I='20-A) TO (17-A) STEP 


390 


NEXT I 


-1 


393 


PRINT AT I, E| " ■ 


26.0 IF I»20 THEN LET B = B+1 


400 


GOTO 180 



It's easy to complain 

about advertisements. 

But which ones? 



Every week millions of advertisements appear in print, on posters or 
in the cinema. 

Most of them comply with the rules contained in the British Code of 
Advertising Practice. 

But some of them break the rules and warrant your complaints. 

If you're not sure about which ones they are, however, drop us a line 
and we'll send you an abridged copy of the Advertising Code. 

Then, if an advertisement bothers you. you'll be justified in m 
bothering us. M 

The Advertising Standards Authority. W 
If an advertisement is wrong, we're here to put it right. 

ASA Ltd, Dept 2 Brook House. Torrington Place, London WC IE 7HN 



This space is dunked m rhc iiitiTt-sts ■ ■! hits': standards of advcn 
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ALL-IN-ONE 



Spectrum Interface 



rive Unit-t-, 



Drive Viaf^j 



RS2 ^4l^r facg 



Spectrum owners! Imagine vitiat 
great use you could make of all 
these components Rotronics have 
integrated them all Into one 
attract Ively styled, compacl unit. All 
the power and a 
floppy disk a 



A complete package 



the micro interface, two 128K 
drives. RS232 serial and 
Centronics parallel ports. Also, 
included i n the package are a blank 
wafer and Spectral Writer - a 
superb word processor program . 

cen Ire of Wa fad rive, controlling all 
its major fu ncti ons . The dual drive 
configuration and the ability to 

connect standard peripherals 
directly provides professional 
system flexibility. All this withouta 
mass of sepa rate components a nd 



transforms your Spectrum into a 
vi-trvijiiwHrlu! system. 

Speed, reliability and 
capacity 

The wafe rs contain an endless 
loop of specia I ly deve lopefJ 
magnetic tape driven at high speed 
past a rcaoYwrite head. The result is 
fast access without data loss. 
Th ree sizes of wafer a re ava liable 
th minimum formatted 



Data transfer rate is a pproxirr lately 
2Kperseconri Access time is 
proportional to capacity. 16K wafers 
are ideal for program development. 
with the larger capacity wafers 
lining niort suitable for general use 
drill a 'i:t living nf completed 
programs and data. Mechanical 
longevity is assured by the use of 
!vp;hfifniiw materials ihiuughoul 
and full inlttultangeabiiily between 
machines is guaranteed. 
Extensive software 

applications 
Wafadrivc provides intelligent 
file handling and rapidacccss to 
data . Progra m deve I opment and 
otherapplicationscanbe 
performed with ease. Start word 
processing Immediately with the 
specially developed software 
package included will : Wniaili-ve. 
Or Udlllti will i a spectacular 
i ntcractivc ga mes program . 
Whatever your mood, you'll find the 
sophisticated Wafadrive software 
challenging and rewarding. Future 



ava I lable for most popular home 

comprehensive 

Tor further information 



ALL-IN-ONE PRICE 

£129.95 (Inc. VAT) 



Centron^cgjnterface 



ZX8 1 DOM ESTIC 



League 
Tables 

Keep track of who's where 
with Cordon Jones who, 
just for the record, hails 
from Middlesex. 



league, it could be football, darts 
01 drinking, in fact any activity 
which involves team positions 

The maximum number 
inams as Ihe program stands 
twenty. This is all the ZX8 1 
display -* ~ 
progra 




10 REM "LEAGUE TABLE" 
20 LET NU=0 
100 CLE 

110 PRINT TAB 12; "MENU" 
120 PRINT AT 2,0; "1. SET UP NEW 
TABLE" 

130 PRINT AT 4,0j"2. PUT IN SCO 
RES" 
140 PRINT AT 6,0; "3. VIEW TABLE 



160 PRINT AT 10,0| "5. SAVE ON T 
APE" 

180 PRINT AT 16,0; "ENTER THE NU- 
MBER OF YOUR CHOICE." 

190 INPUT CH 

200 IF CH<1 OR CH>5 OR CHOINT 
CH THEN GOTO 180 

210 GOTO CH*1000 

300 STOP 
1000 CLS 

1040 PRINT "THIS ROUTINE WILL ER 
ASE ALL", "PREVIOUS ENTRIES." 
1050 PRINT AT 16,0;"M=MENU C=CON 
TINUE: M,C ?" 
1060 INPUT M* 

1070 IF M*="C" THEN GOTO 1110 
1080 GOTO 100 
1110 CLS 

1120 PRINT "NAME OF LEAGUE ?","< 
MAX 7 LETTERS) ",, 
1130 INPUT N* 
1140 IF LEN N*>7 THEN LET N*=N*( 

TO 7) 
1150 PRINT N* 

1160 PRINT "HOW MANY TEAMS ?","(' 
MAX 20) 
1170 INPUT NU 
1180 IF NU<1 OR NU>20 OR NUOINT 

NU THEN GOTO 1170 
1190 LET RN=0 
1200 DIM X*(NU,4) 
1210 DIM P<NU) 
1220 DIM W(NU) 
1230 DIM D<NU) 
1240 DIM L(NU) 
1250 DIM K<NU) 
1260 DIM T(NU) 
1270 DIM F(NU) 
1280 DIM A(NU) 
1290 DIM R*(NU*(NU-1) ,8) 
1300 DIM S(NU*(NU-1) ,2) 
1310 CLS 

1320 PRINT AT 16,5; "GIVE THE NAM 
ES OF ";NU; " TEAMS. " 
1330 PRINT AT 18,5; "USE 4 LETTER 
S FOR EACH TEAM" 
1340 FOR J=l TO NU 
1350 PRINT AT 21,0;" ...." 
1360 INPUT Y* 

1370 IF LEN Y*=4 THEN LET X*(J>= 
Y* 

1380 IF LEN Y#<>4 THEN GOTO 1310 
1390 PRINT AT J,0;X*(J) 
1400 NEXT J 
1630 CLS 

1640 PRINT AT 5,0; "HOW MANY POIN 
TS FOR A WIN ? "; 
1650 INPUT WP 
1660 PRINT WP 
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1670 PRINT AT 10,0; "HOW MANY POI 

NTS FOR A DRAW ? " ; 

16SB INPUT DP 

1690 PRINT DP 

1700 GOTO 3000 

2000 CLS 

2010 IF NU=0 THEN GOTO 8000 

2020 FOR J = l TO NU 

2030 PRINT AT J ,21 ; J; " . "; TAB 24; 

X*(J) 

2040 NEXT J 

2110 FOR J=l TO 21 

2140 PRINT AT J,0j ": 

2150 NEXT J 

2300 PRINT AT 0,0; "RESULTS READY 



= YES 



=NO: 



,N ' 



2310 PRINT 
] 2330 INPUT • 
| 2350 IF Y*="N" THEN GOTO 2660 
1 2360 IF Y*<>"Y" AND Y*<>"N" THEN 
I GOTO 2330 

2370 PRINT AT 0,0; " 

1 23B0 PRINT " 

2390 PRINT AT 3 , B; "GEBTSHanT: H N 
! E NO.?" 

2430 SLOW 

2440 INPUT HT 

2450 IF HT<1 OR HT>NU OR HTOINT 
HT THEN GOTO 2440 

2460 PRINT AT 12,0; X* (HT) ; " " 

2470 PRINT AT 5,12; "SCORE ?" 

2480 INPUT HS 

2490 IF HS<0 OR HSOINT HS THEN 

GOTO 2480 

2500 PRINT AT 12,10;HS 

2510 PRINT AT 7,0: " EBB HWEEEI l I IN 

E NO.?" 

2520 INPUT AT 

2530 IF AT=HT OR AT< 1 OR AT>NU 

R ATOINT AT THEN GOTO 2520 

2540 PRINT AT 14 ,0; XS (AT) ; " " 

2550 PRINT AT 9, 12; "SCORE ?" 

2560 INPUT AS 

2570 IF AS<0 OR ASOINT AS THEN 

GOTO 2560 

2580 PRINT AT 14, 10; AS 

2590 PRINT AT 21,0;"C=CONT E=ERA 

SE: C,E ?" 

2600 INPUT C* 

2610 IF C*="E" THEN GOTO 2640 

2620 IF C»<>"C" AND C*<>"E" THEN 
GOTO 2600 

2630 GOSUB 9000 

2650 SOTO 2110 

2660 CLS 

2670 PRINT AT 10,0; "RESULTS WILL 
NOW BE PROCESSED" 

ZX COMPUTING OCTOBER /NOV EMBER 1984 



26B0 PAUSE 50 

2690 CLS 

2700 GOSUB 7000 

3000 CLS 

3010 IF NU=0 THEN GOTO B000 

3070 FAST 

3080 PRINT N*;AT 0,8; "P W D 

L DIF PTS" 
3090 FOR J=l TO NU 

3100 PRINT AT J,0;J;TAB 2; " . " ; X* 
(J);TAB 8jP(J);TAB 12;W(J);TAB 1 
6;D(J);TAB 20;L(J);TAB 24;K(J);T 
AB 28; T (J) 
3110 NEXT J 

3120 PRINT AT 21,0;"M=MENU C=COP 
Y: M,C ?" 
3130 SLOW 
3140 INPUT M* 
3150 IF M*="C" THEN COPY 
3200 GOTO 100 
4000 CLS 

4010 IF NU=0 THEN GOTO 8000 
4040 LET PF=0 
4050 LET PA=0 
4160 FOR J=l TO NU 
4170 PRINT AT J,20;X*(J) 
4180 NEXT J 

4190 PRINT AT 2,0; " HBHPB THE NAM 
E";AT 4,0;"OF THE TEAM" ; AT 6,0;" 
YOU REQUIRE. » 
4200 INPUT T* 
4210 CLS 

4220 PRINT AT 10,5; "STARTING TO 
SEARCH" 
4230 PAUSE 20 
4240 CLS 
4250 FAST 

4260 PRINT TAB 7;T*;TAB 13;"F:"; 
TAB 19; "A: " 

4270 PRINT AT 1 , 0; " (HOME) "; TAB 2 
6; " (AWAY) " 
4280 PRINT AT 1,7;" 

4290 LET LN=1 

4300 FDR J=l TO NU*(NU-I) 

4310 IF Tt=R*(J, TO 4) THEN GOSU 

B 4580 

4320 NEXT J 

4330 LET LN=1 

4340 FOR J=l TO NU*(NU-1) 

4350 IF Tt=R*(J,5 TO 8) THEN GOS 

UB 4790 

4360 NEXT J 

4370 PRINT AT 0,15;PF;AT 0,21;PA 

4380 PRINT AT 21,0;"M=MENU C=COP 

Y: M,C ■?" 

4390 SLOW 

4400 INPUT M* 

4410 IF M*="C" THEN COPY ►" 



ZXS1 DOMESTIC 



4420 GOTO 100 

4580 LET LN=LN+1 

4590 LET DL=0 

4600 LET GL=0 

4610 GOSUB 4900 

4620 PRINT AT LN.3-0L; S ( J , 1 ) ; TAB 

4j"-";TAB 6-GL;S(J,2) ; TAB B;R*< 
J, 5 TO 8) ;TAB 15; ": " 
4630 IF S(J,1) >S(J,2) THEN PRINT 

AT LN,0; "W" 



7260 LET X*(M)=X*(M 

7270 LET X*(M+1>=D* 

72B0 LET DX=W(M) 

7290 LET W(M)=W<M+1 

7300 LET W(M+i)=DX 

7310 LET DX=P(M) 

7320 LET P(M)=P(M+1 

7330 LET P(M+1>=DX 

7340 LET DX=D(M> 

7350 LET D(M)=D(M+1 



4640 


IF S(J, 1)<S(J.2) 


THEN PRINT 


7 360 


LET D(M+1>=DX 


AT LN,0; "L" 




7570 


LET DX=L(M) 


4650 


IF S(J, 1)=S(J,2> 


THEN PRINT 


7380 


LET L(M)=L<f1+l) 


AT LN,0; "D" 




7390 


LET L<M+1>=DX 


4660 


LET PF=PF+S(J, I) 




7400 


LET DX=K<M) 


4670 


LET PA=PA+S(J,2) 




7410 


LET K(M)=K(M+1) 


4680 


RETURN 




7420 


LET K(M+1)=DX 


4790 


LET LN=LN+1 




7500 


IF T(M)>T(M+1) THEN GOTO 7B 


4B00 


LET DL=0 




B0 




4810 


LET GL=0 




7510 


IF K<MXK(M+1) THEN GOTO 72 


4B20 


GQSUB 4900 




20 




4830 


PRINT AT LN,IB;R*(J, TD 4); 


/BOB 


NEXT M 


TAB 24-DL;S(J, 1) ; TAB 25;"-";TAB 


7890 


NEXT J 


27-GL;S<J,2) 




7899 


SLOW 


4B40 


IF S(J, IXS(J.Z) 


THEN PRINT 


7900 


PRINT AT 10, B; "NEARLY READY 


AT LN.30; "W" 








4850 


IF S(J, 1) >S(J,2) 


THEN PRINT 


7910 


PAUSE 10 


AT LN,30; "L" 




7950 


RETURN 


4860 


IF S(J,1J=S(J,2) 


THEN PRINT 


B000 


PRINT AT 5,8; "NO TABLE YET" 


AT LN,30; "D" 




0010 


PRINT AT 10, B; " (M=MENU) " 


4870 


LET PF=PF+S(J,2) 




8020 


INPUT M* 


4880 


LET PA=PA+S(J,1) 




8030 


GOTO 100 


4B90 


RETURN 




9000 


LET P<HT>=P<HT)+1 


4900 


IF S(J, I) >9 THEN 


LET DL=1 


9010 


LET P(AT)=P(AT>+1 


4910 


IF S(J,2) >9 THEN 


LET GL=1 


9020 


LET K (HT)=K<HT)+HS-AS 


4920 


RETURN 




9030 


LET K(AT)=K(AT>+AS-HS 


5000 


CLS 




9040 


LET F(HT>=F(HT)+HS 


5010 


IF NU=0 THEN GOTO 8000 


9050 


LET A(HT)=ACHT>*AS 


5020 


PRINT "GIVE A NAME TO YOUR 


9060 


LET F(AT)=F(AT)+AS 


TABLE. " 




9070 


LET ACAT) =A(AT)+HS 


5030 


PRINT 




9090 


LET RN=RN+1 


5040 


PRINT -USE IT TO 


RETRIEVE Y 


9100 


LET R*(RN, TO 4)=X*(HT) 


OUR RESULTS. " 




9110 


LET R*(RN,5 TO B>=X*(AT) 


5060 


INPUT Z$ 




9170 


LET S(RN,1>=HS 


50B0 


PRINT AT 8,0; Z* 




9130 


LET S(RN,2)=AS 


5100 


PRINT AT 15,0; "START RECORD 


9240 


IF HS>AS THEN GOTO 9310 


ING. 


PRESS NEWLINE" 




9250 


IF HS<AS THEN GOTO 9410 


5150 


INPUT I* 




<7?60 


IF HS=AS THEN GOTO 9510 


5160 


SAVE Z% 




9310 


LET W<HT)=W<HT)+1 


5170 


GOTO 100 




9320 


LET L(AT)=L(AT)+1 


7000 


FAST 




9330 


GOTO 9600 


7010 


FOR J=l TO NU 




94 IB 


LET W(AT)=W(AT)+1 i 


7020 


FOR M=l TO NU-1 




9420 


LET L<HT)=LCHT>+1 


7100 


IF T(M) >=T(M+1) 


THEN GOTO 7 


9430 


GOTO 9600 


500 






9510 


LET D(HT)=D(HTI+1 


7220 


LET DX=T(M) 




9520 


LET D(AT)=D(AT)+1 


7230 


LET T(M)=T(M+1) 




9600 


LET T<HT)=W<HT)«WP+D(HT>«DP 


7240 


LET T(M+1)=DX 




96 10 


LET T(AT)=W(AT)*WP+D(AT)*DP 


7250 


LET D*=X*(M) 




9700 


RETURN 
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I16K SPECTRUM CAMEl 



Astro zone 

where would we be without our usual foray into 
space? Craig Sanders of Stockport provides the 
transport 



is? Maybe we are gettjr 
over confidant, triggei firvgei 
wearing a bit thin 



1 REM *«****A3TR0 ZONE*** ftft* 

2 REM # C. SANDERS 1993 * 

3 REM ft 16P. SPECTRUM * 
■1 REM *A,B,C and D in lines* 

ft 120, 150, 230, 2-10, -IIP,* 
ft420 and 1030 are UDG* 
*graphic tnoae chars, ft 
********************** 
5 LET hi»0 
10 REM ft**GRAPHICS#ft* 
15 PAPER 0! BORDER 0: INK 7: C 
L3 

20 FOR f=0 TO 3: FOR g=0 TO 7: 
REAr c: POKE USR CHR* (144tf>*-g 
,c: NEXT g: NEXT f 

30 DATA 24, 21, 21, 60,60,60, 255, 
255 

40 DATA 126,255,219,255,153,12 



9, 12 



195 



TS LET «C"0: LET : 

LET z=19: LET m=12: LET le= 
00 REM ***INSTRUCTIONS#ft* 
10 FLASH 0: BRIGHT 0: OYER 




36, S5, 3 
LET en = 



20 PRINT AT 2,4; INK 
MK 7i" ASTRO EATTLE" 
B"IAT 3,4i INK 7J "- 



130 PRINT AT 6, 

S: " 1 AT 3,6; INK 

T 10, 6i " IB) - RIGHT 

I - FIRE'iAT 14,6 

SHIELDS" 

140 PRINT AT 18, 4 






■CONTRO 
LEFT" i 

12,6; " ( 
ENERGY 



U h£J 


e a 


nss i mum o 


fiveenei-9/ ■ 








1617 


PRI 


IT AT 21,6 


"p-«« »«y ^ 


170 


PAUSE 0: CLS 


FOR i=30 TO 


STEP - 


:: BEEP . 


, i : BEEP .005 


, 1 +3fl J N 


EXT i 




200 


REM 


ft**SCREEN 


DISPLAYftftft 


205 


FOR 


f=0 TO 50 


plot RND#230 


,RND#170 


NEXT f 




210 


PRI 


IT AT 0,0; 


t SCORE] : "isci 


AT 


151 


" t HIGH- SCORE 1 : " [hi | AT 21 


,0; " 


LIV 


iSJI-llllAT 21,10i"ISHIE 


LD51 


"le 


nSAT 21,23 


■ [ LEVEL l: "Me 


211 


IF 


e=l THEM 


LET x-2 


212 


IF 


e=2 THEM 


LET x=3 


213 


IF 


Ie-3 THEM 


LET M-4 


314 


IF 


e = 4 THEN 


LET x=5 


215 


IF 


i*=B THEN 


LET x-& 


216 


IF 


. e~5 THEM 


LET le=5 


225 


LET 


B»IN7 <RNDft24> *1 


230 





PRINT AT M 


=1 INK 4i " B 



240 PRINT AT z,mj INK 3( " A " 
250 LET m=m* IINKEY«="8" AMD m<2 
:) - 'IHKEYS="5" AND m>0) 
260 IF INKEY*-"7" THEM GO TO 330 
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270 IF INKEY*="6" AMD en)0 THEN 
GO TO 400 

2B0 LET s=s+(RND>.4 AND s<30>-< 
RH0>.4 AMD s>I) 

290 IF x> = 19 THEN GO TO 600 

300 LET x = x + l 

310 BEEP 0.004,x 

313 IF 5C=100 THEM LET Ie-2 

316 IF *c=200 THEM LET le=3 

31? IF sc=300 THEN LET 1 m-=A 

31B IF sc=600 THEN LET 1 »=5 

340 GO TO 230 

330 REM ***FIRE*** 

335 PLOT 8#<ro+l)*3,24: DRAW 0, ( 
I7.?-x>*8: OVER l: PLOT 8*<m+l)+ 
3,24: TRAU 0, (l?.9-x)#B: O'-'ER 1 

363 FOR p = 10 TO 151 BEEF . 005 , p 

: NEXT p: OVER 0: 

370 IF m-H THEM GO TO 700 

38P GO TO 260 

490 REM ***ENERGY SHIELDS*** 




410 FOR n'18 TO 2 STEP -2! PRIM 
T AT n,0[ INK 6) PAPER 9t I "DDDDD 
DDCrrrDDDDDDDDDDDDDDDDDDDDE" : HE 
XT n 

42.0 PRINT AT x,s + li INK 6| PAPE 
R 2fi"C": FOR v- 40 TO 55: BEEP . 
02, v: NEXT VI PRINT AT x,s*H" " 

430 FOR n=2 TO 18 STEP 1: PRINT 

AT n,0) " 

": NEXT n: PAUSE 10 

440 LET en=en-l 

460 GO TO 210 

600 REM ***LIYES*** 

610 LET li=li-l: IF li=0 THEN 
GO TO 650 

615 PRINT AT x, si " 

620 FOR <=1 TO 2: BEEP .05,20: 
BEEP .05,0: BEEP'. 04, 2! BEEP .05 
,l: NEXT i 

630 GO TO 210 

630 GO TO 1000 
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700 REM ***EXPLOSION**» 
710 PRINT AT x,s+l| INK 6) PAPE 
2["C": FOR v- 40 TO 53: BEEP .0 
;,Vl NEXT vl PRINT AT x,5i" " : 
713 LET £c==c+25. 
720 GO TO 210 
090 REM ***GAME O'.'ER*** 
1003 FOR g=l TO 5! FOR f-0 TO 7: 
BORDER f: BEEP .03,+: NEXT f : M 
EXT g 
1010 BORDER 0: PAPER 0: CLS : PR 

0| "GAME OVER" 
1020 PAUSE 30 

01 INK 6i PAPE 
OR a=10 TO 20: 
NEXT a: PRIMT AT 
PAUSE 50: CLS 



PRINT AT 5, 



030 IF sc 
060 PRINT 


hi THEh 
AT 7,0; 


LET hi»sc 
■HIGH-SCORE 


965 PRINT 
070 IF sc 


=0 THEt> 


■LEVEL-"! le 

PRINT AT 



'FINAL SCORE= 



I " P A T H E T I C ! • ! " 

073 IF 5C>0 AMD sc<300 THEM PR 

NT AT 15,9! "NOT BAD - TRY AGAIN 

080 IF £C>300 AND 5C<700 THEN 
PRINT AT 15, 0i "GETTING BETTER" 

099 IF sc>700 AND sc<FJ00 THEM 
RINT AT 15,01 "EXCELLENT! " 
095 IF SOS00 AMD sc<900 THEM 
RINT AT 15,0) "SUPREME CHAMPION! 

100 IF sc)1000 THEN PRIMT AT 1 
,0i PAPER 6J INK 2; FLASH 1J-UL 
MATE SUPREME CHAMPION! ! ! • ! ! " 
200 PRIMT AT 20,01 "Press any Ue 

to play again...." 
250 FOR c=l TO 5: FOR x=0 TO 7: 
BEEP ,01,x+c: BEEP .02,x*c: BEE 

.03,x-c: NEXT x: NEXT c 
300 PAUSE 0: CLS : 00 TO 70 




<p#o 
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THE MOST IMAGINATIVE GRAPHICS 
PROGRAMMING SOFTWARE FOR YOUR SPECTRUM 




GRAPHICS PROGRAMMING MADE EASY- 
THE PRINT <N' PLOTTER WAY! 



PAINTBOX 

Superb Graphics 
thoiit expensive hardware! 



PHISTSri.l'TTKK 

KEYBOARD OVERLAYS 

The simple answer to 
"Which key?" 



i„lh- 



"Wliiiti key lines what?" 

If you program, or buy sonant 

produced software, s ii;r or later yi 

raced with .1 miiid-hii^lin^ mass of keys 
hat ivinn-:n di'ii r.-i: functions. 

impleaslhe KIKH 






Amazing ivrs.itilc ln-l- k- 
rinsbiwnUvhiJiiiK-li.J,-! 
l<: I'l.oT. UijAW. I1UAW 



hhi:i-: m'i.annkk 

For the best of both wofUis! 

PMriSlON ['[.OTTER and CIK: 
CHARACTERS' For complete scree 



PRIST XI'LOTim 

SCREEN MACHINE 

Instant machine code 
fur graphics and text. 

SCREEN MACHINE is an xnr. 

Graphics utility to usc«ilh PAIYI'lil )\ or 
.uiyuthci tiapbiis hardware or software! 

ft gives a wide "angc nt facilities In 
enable yno to manipulate graphics anJ 
text, saving lime, memory and giving truly 
prolessiunal results. 

For instance: SCREEN MACHINE 

■;■■ .-.,..!. :,, .,...., 



PRIST XI'LOTTtCR 

ZX SPECTRUM JOTTER 

Pre-planning your screen 
made easy . . . and precise! 



in n:i<st,, 
■rdt.irthcS 




ight..iaL air 
etthin 



lick. iiD pages of 
numbered pixel 
■if' PRINT grids 



ailing, du: 



drawing anil tr 

" r pre-planning graphics, text. 

n.iranvtliiiigl.iprnduie im 
Print n Plotter JOTTER won't I 

The complete package comes \eilh . 

''ll'voui.Vt'V '.''. v - I'-I.S 
MACHINE or j:lv „thei graphic, u:i!it> . 
■.■.■i:'IKJ...|lnrii;.-b-r. i 11 'I ''... uHlUNA! 
Print 'b Plotter JOTTER; 



Print 'n' Holler Products also 
market Z\ PKINTEK PAPEK tli.it gives 
gond. clear print, eminent Iced ing qualities 
piuhahh thclvstv,. nil find in the l.K. 

FAST DELIVERY and 
ec lii ally priced . . . yno mini find 

I~~ t'KKIIIl 1 MtllJ'iNH. A.VSAI'IIOXK ~~ ] 
0RDE8S 

01-660 7231 
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■HARDWARE REVIEW! 






Bdrfith 



singly 



INTERPACITS — 

Joystick 

interfacing 

investigated! 

A comprehensive round up of the unit! 

available — checked out by our team 

of reviewers 



necessary for some of tt 
plax graphics packages l 
appearing for the Spe 
However it you have i 
taken the plunge anfl ai 
contemplating tha purchase of 



do* 



motor 



ve a difficult cl 



ween your joystick and the c 
puter i.e. the INTERFACE. 

Interfaces allow the us 
joysticks with compatible : 
ware, and although there 

available for use with all 



Non 
programmable 



Kempston 
£11.95 



interface ll 
Sinclair Research 

£19.95 



dard" for operating his interface 
Kempston. Thi 



:artridge programs has 
rialised. This is really 
r of this unit and if they 
joing to be produced 



RAM Turbo Games Ace 

Ram Electronics vox Box 

(Fleet) Ltd. Datel Electronics 

£22.95 £29.95 
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iHARDWAREREVIEW! 




s stage that my fi 

number of games 
hands, does the i 



that 



e joystick 



keyboard? 

Programming ol the interface 
is fairly easy — set the selector 
to the Program position, press 
the appropriate direction key 

relevant lor n< 



re- grams the interface to res 
IX- to the appropriate keys. I 
to game you're using fails to 



arte 



leaflet, for those people who 

beyond being mere players, who 

joystick and interface into their 

programmers who want to use 
two joysticks to control two 
separate objects at the same 



corpora ted simultaneously into 
programs. 

Just out of interest, I wonder 



Programmable 
interfaces 



Rainbow 
Electronics 

£24.00 < + £3.00 

extra for a 
through-port) 

this roundup. 

The interface includes a bui 
in amp and speaker, the joystic 
socket and the programmin 
switch are positioned at th 
front I with all i 

CCi (Custom cables 
international) 

£15.00 

This unit is programmed by 
means of software supplied or 
tape, and this means that yoi. 
have to load in the program sup 
plied before loading your game. 
This isn't a great problem as it is 



the keys is straightforward an 
only takes a few minutes. Th 



be dealt v. 



early preview model". Never- 
theless I found it simplicity itself 
to operate even without them - 

The only problem is that 

which keys the program uses so 
you have to load them in first to 
find outl This is only a problem 
the first time round because, be- 
ing sensible, you kept a record 



effective over a 



way you gol One addi- 
allows the joystick to 



dmirably for 
irobably one 



Programmable 
Joystick interface 
Stonechip 

Electronics 
£24.45 



lis is simply a plug- in up 
i flywires of extra ' 



terraces Mike Edmunds ' 



90x75 x35m 



snugly tc 



w of 



your Spectrur 
three-way switch at the front 
enabling the user to select any of 
the three modes; Program, Play 

trol relies upon the keyboard 



The Cambridge 
Joystick interface 
£34.95 (including 

joystick) 



tions then you have to load tfK I 
game first to find out' Howeven 
once you have programmed i 
set of key-sequences, they car : 
be saved on tape Ithe revera 

blank forthis purpose and provi , 
sion is also made for saving r . 
microdrive) and many game! 



■ gives position at 

jibble. g ramming 
i other This interface 

. the plete with a joysti 

) FIRE the joystick is 

arately separately and is 

ill that The interface is 



variety of joysticks and perform- 
ed perfectly well with all of 
them. Included in the instruc- 
tions is a sample program to 
enable practice — programming 
prior to testing on the real thing. 
If a Programmable Interface 

this should be considered. It is 
slightly expensive in comparison 
to some of the updated and 
newer models now appearing, 

tried and 



Programmable 
Joystick interface • 
Downsway 
Electronics (UK) 
Ltd. 

£22.95 

The Downsway Programm 

available for quite some 

plain black unit which piugt I 
diractlyintotheSpectrum's ' 

65 x95 -25mm and ha 



is Interface hal ■ 
er units current!) 
tt the keyboard ii i 



in sheet provided | 
has a through- with the Interface gives al 
k which is very information that is needs 
other units like make your joystick compi 



help prevent "wobble" 



ming of the Interf act 
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loadingagameor after the game 
has loaded. This facility takas 
care of all those programs that 



jov stick socket is 



should be in the down position 
— switching it up instantly 



'play' mode and away you go 

In operation the unit pert on 

ad perfectly and on the odd c 



through the entire 

Tha FIRE command is in- 
dependent of direction corn- 
has only to be programmed 
once, M opposed to the multiple 
rnovernem/f i re ope rations need - 



ed into memory if needed. Af 

operation due to the awkwart 
with the keyboard but it was 



ACF Programmable 
Joystick interface 
£26.95 






tended for joystick use any way I 
In conclusion, if a joystick in- 
terface is high on your list of 

! priorities then it may well be 
worth your while paying a bit 

I monforthe extra flexibility that 

Mike Edmunds 



Pox Programmable 

interface 

fox Electronics 

Ltd. 

£34.95 

I have used this unit consist ant ly 
over a four week period with a 
f games and I 



keyboard needed another bit 
removed before it would fit I The 
ilandard case presents no pro- 



Iways opera' 



;s''h:-ii 
Id by 

vo players! A set of quick 
reference cards, a demo tape 
and a stick on chart completes 
the package. 

The sight of uncased wires 

users, but treated reasonably. 



itrol re 



1 of providing 



irough port 
and further peripherals can be 
added afterwards, I used a Cen- 
tronics interface and a speech 
unit with it and hed no problems. 

Switchable 

interface 

Protek Computing 

Ltd. 

£19.95 



tape. The most interesting item 
that I've seen from this com- 
pany must be their Delta 3 

tangular base, three fire buttons 
{to alow for individual styles of 
holding the thing), and a finger- 
tip type joystick at £10.00. 

Pace computing 



menently refreshed by a battery 

which is constantly recharged. 

What happens if something 

The interface is supplied with 



give you compatibility with Pro- 
tek/AGF Icursor keys), Kemp- 
ston and Sinclair Interface II for- 
mats respectively. 

Between these three options 
1 should think that around 90% 
of the software on tha market 

joystick options are provided 
and keys Other than the cursor 
keys are used, and there can't 
be many of those I 

fitted in the right hand side of the 

the keyboard. 
The instrui 



East London 
Robotics Ltd. 

£15.00 

Designed to be sold with their 
Trick Stick (of which we're still 
waiting for a review samplel. it 
appears to be similar to tha AGF 
programmable interface, in that 
fly leads which are connected to 
pins to mimic the keyboard are 

If' bought i 



O.OO.y 






dtograi 



ion leaflet is 



DkTronics Ltd. 
£22.95 

face and Is programmable from 
the keyboard by using the 
switch provided on the top of 



£26.95. 

The interface works by 
duplicating the keyboard layout 
with a grid of wires. The wires 
ending in crocodile clips can be 
attached to the various grid 
wires to route specific keys to 
the joystick. This means that all 
games can be controlled by 
joystick although you must use 
the keyboard option and not the 
joystick one when provided. 

The joystick is connected by 
a standard 9 pin D socket so it is 
compatible with the majority of 

sockets are provided for 
eticks for two players to | 
alternatively, Both sock 



fully programmable :i 



Using this is a delight, even 
lough most programmables 



Firmware 
Programmer 
interface £29.00 
Software 
Programmer 
interface £22.95 
voltmace Ltd. 



r by using a progra 





peration 


thfl 


keyboard is s 




hat 


complex garr 


is requinng i 






lo be pressor. 




still be playec 








of going to | 












nf 




let Ms Grea 


of 


the company 




iby 






overflowing. 


The information 
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Protocol 4 
ACF Hardware 
E30.95 



e snapped 



The device is supplied with units bai 

three pre-programmed cards to told me | 

cover Kempston, Sinclair and by ZX81 

Protek/AGF (cursor keys). An that fron 

extra, blank card is supplied for The i 

your own use. port and 



ersonally, t 

Spectrum 



yourself at your nearest si 
There are probably E 



a full through future 



style 






II joystick is supported a 



Addresses 



AGF Hardware, 
26, Van Gogh Place. 

Bogner Regis, 

West Sussex. 

The Cambridge Joystick Interface, 
40-42 Hobson Street, 

Cambridge CB1 1NL. 

CCI (Custom Cables 

International), 

Units 2.3 and 4, 

Shire Hill Industrial Estate. 

Saffron Waldon, 

Essex CB11 3AQ. 

Date! Electronics, 

UnitG, 

Fanton Industrial Estate, 

Dews bury Road. 

Stoke-on-Trent. 

DK'Tronics Ltd., 

Unite, 

Shire Hill Industrial Estate, 

Saffron Waldon. 

Essex CB11 3AQ. 



Downs way Electronics (UK) 

Ltd., 

Depot Road, 

Epsom, 

East London Robotics Ltd., 
Gate 1. 

Royal Albert Docks, 
London El 1 . 



Hampshire. 

Kempston Electronics. 

Unit 30, 

Singer Way. 

Wobum Road Industrial Estate. 

Kempston, 

Beds. MK42 7AF. 

Pace Computing, 
28, Bur wood Grove, 
May ling Island, 
Hampshire. 

Protak Computing Ltd.. 

14 Young Square, 

Brucef ield Industrial Estate, 

Livingston. 

West Lothian. 



Rainbow Electronics. 
Glebe House, 
South Leigh. 
Witney, 
Oxfordshire OX3 6XJ. 

RAM Electronics (Fleet) Ltd., 

1 06 Fleet Road. 

Fleet. 

Hampshire GUI 3 SPA. 

Sinclair Research, 
Stanhope Road. 
Camberley. 
Surrey GU153PS. 

Solidisk Technology Ltd., 
Sinclair Computer Add Ons Div: 
1 7 Sweyne Avenue, 
Southend- on -Sea, 
Essex SS2 6 JQ 

Stonechlp Electronics. 

Untt9, 

Brook Trading Estate, 

Deadbrook Lane. 

Alders hot, 

Hants. GU124XB. 

Volt mace Ltd., 
Park Drive, 
Baldock, 
Hertfordshire SG7 6ES. 
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Car costs 



is it time to retire the, 
drives from Norwich, 
with his program 
for the ZX81 or 
Spectrum. ( o 



family Rolls? Peter Lawrence 



bwstie is actually costing you. 
Notethatthe # sign in ihe listing 
should be replaced by the pound 
sign. Happy motoring! 



20 



REM *** CAR COSTS *** 

i rem * n is pound ■sign * 

2 REM ******************* 
365 
-MONTHLY CAR COST 




A?- F 



60 INPUT 
70 PRINT 
■*5 PRINT 



FUEL COWSUHF 



290 INPUT R 

300 PRINT "tt" 1 R 

310 LET A = A + R 

320 PRINT "Car i i 

330 INPUT I 

340 PRINT "«" ; I 

350 LET A=A*I 

360 PRINT "Repai 






130 INF 


T L 


110 PRI 


T L 


150 PRI 


JT "Cost of p 


160 INPUT P 


173 PRI 


IT "»"iP 


1B0 LET 


G = L*. 22 


190 LET 


Z=INT (M/6*l 


200 PRI 


IT 


210 PRI 


■*T Z! "Miles p 


220 PRI 


IT 


230 PRI 


NT "ANNUAL CO 


235 PRI 


IT 


210 PRI 


NT "Car tax 



; PRINT 



Tyr* 



•110 INPUT T 
420 PRINT "tt" I T 
43"0 LET A-AiT 
AAB PRINT "Deprs 
■ "I 



■165 LET A-A*E 
500 LET £>A/Y*r 
510 LET B-C+F 
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Portability 2 

M P Moore of Petron Electronics 

describes the construction of a parallel 

I/O board for use with the Portability 

interface 



to build 3 parallel interface board 

the interface published in the 
last issue. The Parallel In. Out 
Board has two 8 bit input and 
two 8 bit output ports. We also 
describe an LED board, which 
allows your computer to light 
LEDs (Light Emitting Diodes) 
from the output ports, and 
another board containing four 
relays which can be switched on 
and off by your computer. 

Up to four of these parallel in- 
terface boards could be con- 
nected to the interface giving a 
total of 64 input and 64 output 
lines (eight, 8 bit input ports and 
eight, 8 bit output ports). The 
really dedicated enthusiast 
could use the interface to con- 
trol 64 relays... 

important note 

Since publication of the first part 
of this project, the design of the 
PCB has been changed slightly. 
Although the ICs on the main in- 
terface board still draw their 5 
volt supply from the computer, 
this 5 volt line is no longer taken 
to the four I/O sockets; instead 
the 9 volt line is used, requiring 
each additional board to have its 
own 5 volt regulator. This is to 
reduce the load on the com- 





.0. 




••"F 




^.,, 


«|, 




,\m 


.,|. 




.|. 


„|. 




"1" 


.|. 




..|... 


>|. 




•> 


li 




li 


; 


' m « 






socA.r eonnschons. 



2 is connected tc 



made their own PCB from tl 
layout in the first part of this pr 
ject, Fig. Bshowsthealteratioi 



The revised c 
hown in Fig. A 

made. The link 
dispensed with 

to +9V rather 1 
new track whicf 
right-hand side o 
now goes no further tl 
linkabovelC2.0V.'GND 



PCB. +5V SKI; 



Parallel board 
connections 



nected to an LED board contain 
ing 8 LEDs. + 5V |VCC) andOt. 
(GND) are taken to the bog| 
along with the eight outputs. ! 
0.1 inch PC plugs art 
sockets (supplied with the kit 



:h output is 
itor to an LED; the LEQ 
i connected so that thai 
:eeithera 1 ora 0. If thai 1 
.vired to indicate a 1 an 
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LEDr. 7 



e 200, 



wry i 



light 






1100 1000. 

The LED board could I 

display numbers in the range 
I to 255 in binary code, output 
sport A lor Bl. 

Output port B is connected ii 



detector which will return the 
value 255 in full daylight and 
254 in darkness. Since daylight 
comes and goes gradually, there 
certain point where 



sed, each of the ports on the For tho SPECTRUM 
arallel board will have a number 
5 identify it [See Fig. 2). 



LDR1 






■alay b 



attaining four 

'i, note the VCCendGND 
Outputtingal to a 
n that relay on: if 
|W wished to switch relav2 on, 
would output the number 4 
which is 0000 0100 in binary; 
elays 1 and 2 you 
would output the number 6 
wiich is OO0O 0110. 
A method of connecting ex- 
mat switches to the board is 
town at port C. 
- will always 

will be taken to GND 
cO and the value real 
l C will be 1 111 1110 or 
54. With the switch open (off] 



resistance and 00 w 
:te Between and 1;sof 
(ritten for use with the ci 



Each port is marked A,B,Cor 
D. Table 2 gives the m ' 
each port, A,B, C&Ddependir 



Programming the 
parallel Interface 
board 



lei board. Since multicolour 
ribbon cable is used for the 
con- jumper cables, this is not dif- 
face ficult to check. 



To output data to the parallel 
output port marked 'A' (Fig. 2) 
and to input data from port 'D': 

OUT 65407, 254 (selects ports 

A&D1 

OUT 65471. * loutputs the 

contents of variable * to port A) 

LET A = IN 65471 Ireads the 



The following program will 
display a count from to 255 in 
binary code on 8 LEDs con- 
nected to output port A. 

10OUT65407, 254 

20 FORF = 0TO255 : OUT 

65471. F: PAUSE 20 : 

NEXTF 
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7} 





J L 

Flgur* 4. LEO connections 



1 HEM (machine code) 
10 POKE 16516,254 
20RANDUSR 1651 J in. 

select device 254 i.e. 

ports A and D 
30 FORF = 0TO255 
40 POKE 16520. F 
50 RANDUSR 16519|Io 

output the value of F. 

POKEd in line 40) 
60 NEXTF 



Parallel 
input /output 
board 
construction 

See Fig. 2 1PCB Overlay) 



at a time. There ate fourteen 
links in ell. Be very careful not to 

all five ICs plus one for the DIL 
plug from the main interface 
board. Solder these in one at a 
time, again watching out for 
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Mind. Look at Fig. t 



appear to be a smaller 
lorter 'arm'. The 'Cup' is 
ha Cathode or negativt 



u may choose any combina- 

inLEDl or LED2) though it is 
ualfy more useful to have all 
jfo LEDS indicating the same 
jiclevein orO). 

Remember that when an LED 

■e laad 
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Figure 6. Para 




oard circuit dimgiam 
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be indeterminate since this this regulator will tend to run 








would give rrse to data bus con- 


hot. especially if 




1 very many relays art 




























lines are tied to GND. Data is lat- 




















computer data bus. When PBD 
and [one) PE line go low, one of 


ched into these 74LS374 chips 


Parts list 








these buffers will be enabled. 


CP. the clock Input driven bv a 




















be placed on the data bus. 


The boerd's 5 volt line is 
























line by a S volt regulator. Since 


IC4.5 


74LS374 












7805 + 5V regulator 
220uf 1 6v electrolytic 








CI 




Buylines 


Parallel Board costs £4,50, the 


C2,3.4 


0. 1 uf ceramic 






All the components used in this 


LED board 85p, and the Relay 


2, 14pinlCsoc 








project with the exception of the 




8, 5 way PCplu 


s and sockets. 






PCBs are available through elec- 


Newtech will also supply 


1 PCB 








tronic component suppliers who 


complete kits of parts for this 










advertise regularly in electronics 


project which include the PCB 


LED Board 








magazines. 


and all components. The Parallel 














LED 1-8. 


TIL209orequi 






Newtech 1 Micro) Developments 


board £2.50, and the Belay 


R1-8 


330B 5% 






Ltd., 1, Courtlands Road. 


Board £1 1.95. Postage is extra 










Newton Abbot, Devon. The 


at 30p per order. 











2N3704 
1N4148 
560R 5% V. 



l/l/lzard Software 



ZX SPECTRUM 48K 















:sau(; mach re 
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SPECTRUM CRICKET 










Play eilher tes 
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vailarjle: Tim* Port 1 £6.95 Evlclor £5.45 Fnilti £4.9S 

d Sortwwe, Depl zx, PO Bo« 23. Dunflrmllne. file 
lable from software relailers worldwide. Send large S i\ I 'i-,.r", ri, 




Please send me a copvol TRANS-EXPRESS ©@® ® J™ 
cheque/PC 10' 



8WW 113 Melrose Ave. L 



OCTOBER /NOV EMBER 1! 



SPECTRUM CAME 



Card corner 
Patience ill 



This issue, Colin Gooch presents us with his 
version of 'eleven-up' Patience. 




* ♦ ♦ V 



SPECTRUM CAME 



back to the beginning. If it 
faulty input you will ba askt 
enter again. If you have rur 



Main variables 



temporary flag 
for next loops 



is of CS 
cards dealt 



what cards are dealt by using an 
array RS . I have done this rather 
than using the SCREENS func- 



n. Debugging should not 



TIENCE ESC. 



1010 REM *********************** 
****GRAPHIC REPRESENTATION****** 
********************************* 
****IN LIMES WITH USER GRAPHICS 
******* THESE ARE SHOWN AS ITALIC 

******************************** 
***FOR THE CHUNKY GRAPHICS THOSE 
UN SHIFTED ARE SHOWN AS ITALIC 1 
23436-*SI AND THOSE SHIFTED AS ITA 
.IC LOWER CASE****************** 
******************************** 
DEF FN C(X)=6*(X=2 OR X-6 ) * 
X-9)+lS*(X-3 OR X=-> *24*{X=4 
X = 8>: DEF FN D(X) =2+6*<X>4> + 



4*C 



AND : 



| ■ .-. ; ■ | 



1030 RANDOMIZE I RANDOMIZE 
1040 GO SUB 1600: BORDER 4! 
R 41 INK 0: CLS : GO SUB 1710: G 
O SUB 1400! GO SUB 1300 
1050 REM PRINT STARTING HAND 
060 LET A"ii FOR N=l TO 44 STEP 
5: : LET X = FN C!A)*-2: LET Y«FN D 
A)*7I PRINT AT Y,Xi PAPER 6! IN 
1 0i " "IAS" ": LET A=A+1! NEXT N 
070 LET A=l: FOR N=l TO 44 STEP 
3: LET X-FN CIA): LET Y-FN D<A1 
LET C*=P*(N TO N*41 1 LET R* I A ) 



= C*t2 TO 31 



LET A- 



GO SUB 1260: 
A*l! NEXT N: LET CD-9 
10B0 LET P*'P*(46 TO ) 
1090 PRINT AT 21,131 PAPER 5! IN 
K 0) ' "iAT 19, 13t "CARDS*; AT 
20,131-LEFT -iAT 21,15J52-CD: IN 
PUT (AT 0,0! "ENTER POSITION OF C 
ARDS TO BE"iAT 1 , 0i ■ COVERED eg. 
35 10 TO RESIGN)'! LIME I*: IF Z 
*--■ THEN GO SUP 1230 
1100 IF LEN Z*>3 THEN GO SUB 123 
0: GO TO 1100 

1110 DIM 2 (LEN Z*) : FOR M=l TO L 
EN ZS: IF CODE Z*(N><48 OR CODE 
Z»(N)>37 THEN GO SUB 1230: GO TO 

1100 
1120 LET 2<N)=VAL 2*IN) ! NEXT N 

; IF LEN Z*=l AND 2« ( 1 1 < > ■■ S» " AN 
D Z*(1)<>"0" THEM GO SUB 1230! G 
TO 1100 

1130 IF LEN 2*=2 THEN LET FA=0: 
IF 2(1)-Z(2) THEN GO SUB 1230: G 
TO 1100 

1140 IF LEN Z«»3 THEN LET FA=0: 
IF (Z(1)=Z(2)) + (Z(1)-2(3H*<Z(2) 
-ZI3)I THEN GO SUB 1230: GO TO 1 
100 
1150 IF VM. Zt-0 THEN LET RES=1: 

GO TO 1510 
1160 IF FA THEN GO SUB 12301 GO 
TO 1 100 

1170 IF LEN Z*-I THEN LET FA-FA* 
1 

1180 FOR N=l TO LEN Z*: LET T=T* 
VAL R«IZ(N)): NEXT N: IF TOll A 
ND TOSt AND LEN ZSOl THEN GO S 
UB 1230: LET T-=0: CO TO 1100 
1190 IF T-ll AND LEN Z*<>2 THEN 
GO SUB 1230: LET T-0: GO TO 1100 
1200 IF T-36 AND LEN Z*<>3 THEN 
GO SUB 1230: LET T=0! GO TO 1100 
1210 FOR N-l TO LEN Z*: LET C*=P 
*(1 TO 5) I LET PS=P*(6 TO ) : LE 
T CS*CS+1! IF CD=32 THEN GO TO 1 
510 

1220 LET X"FN C(Z1N)): LET Y-FN 
DIZ(N)!: GO SUB 1260: LET R«(Z(N 
))=C*<2 TO 3): NEXT N: LET T-0: 
GO TO 1090 

1230 INPUT ;AT 0,0i 'INPUT UNACCE 
PTABLE"iAT 1,0; "PLEASE ENTER AGA 
IN"I LINE 2*: IF Z*="" THEN GO T 

1230: 
1240 RETURN 

1250 REM PRINT CARD 

1260 INK VAL C=(3): LET E*=C* < 4 ) 

1 LET F«=C*U) 
FOR M*Y TO S*12*IY 
PRINT AT M,K+1| IN 



1270 PAPER 7: 
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K 0i " ": NEXT M: PRI 

X+liFSJAT Y+6,X+5fFS 
1230 PRINT AT YU.XUIE* 
X*5(E* 

1290 IF <F*»"A" ) + (FS="3" 
■| + {F*«="9"! THEM PRINT A" 
3 IE* 

1300 IF <F*="2" ) ♦ <F«-"3" 
RINT AT Y+2,X*3!E*1AT y*. 
1310 IF (F*="4" I +(P*-*3« 
■| + (F*-"9") + <F*="/r ) THEI 
AT Y*2,X+2(E*|AT Y+2,X»4 
•4,X±2IE*iAT Y+4,X*4SES 
1320 IF IF*=*6" ) + tF«="7" 
RINT AT Y+1.X+2JESIAT 
1AT Y+3,X*2)E*)AT Y + 3 
Y+5,X+2!E«!AT Y+5.X+4IE* 
1330 IF <F«-"7") THEN PR 
♦3,X*31ES 
1340 IF (F*="B" ) + 
") THEN PRINT AT <i 
•1,X + 4|E«IAT Y+3,X*2IE«f AT Y1-5.X 
+4|E» 

1330 IF (F»="/T) THEN PR 
*3,X+21E*!AT Y+3,X+4|E* 
1360 IF F«="J* THEN PRIN 
,X + 3i "cc" JAT Y+2,X+4! "*° 
K+4t-'»*tAT Y+4.X+2J " S8e" 
X*2i "132" 

1370 IF F*="G" THEI 
,X + 2j -*cs" I AT Y*2,X+2i "58s"; AT 
*3,X*2I "SPe- J AT Y + 4,X + 2 
Y+5.X+2; "/7Z-IAT Y + 6.X 
1380 IF F*=-K" THEN PRII 
,X*2t "eJe" i AT Y+2.X+21 "eA'I AT 
3.X + 21 "A*' I AT Y+4,X*2| "e>" ; AT 
5,X*2| "e-5e" 
1390 RETURN 
1400 REM SET UPPACK 



<F*= :, 5 



THEN P 
,X+4iE* 
IE«!AT 

:INT AT Y 



INT AT 



AT Y* 



LET . 



L.ET 



3404505606707808909/H0J 1 1Q I 2K13 " 
1420 PRINT AT 8,9; INK 1( PAPER 
5)B*!BS; B*|B*1 AT 10, 10j FLASH 1; 

PAPER 7| INK 2i "PREPARING PACK" 
IAT 12,9) FLASH 0f PAPER 3f INK 
l!B«|B*f B*|BS 

1430 FOR G=l TO 39 STEP 3: FOR P 
=1 TO 4: LET COL-0: IF P-l OR P- 
3 THEN LET C0L=2 

1440 LET A*=A*+D*(B TO Q+2)+B*<P 
1+STR* COL 
1450 NEXT P: NEXT 61 

1460 CLS : PRINT AT 8,9i PAPER 5 
1 INK ltB*|B*lBS|B*iAT 10,12) PA 
PER 71 FLASH 1 I "SHUFFLING" | AT 12 
,91 PAPER 51 INK U FLASH 0|B«JB 
« IBS IBS 
.470 FOR N=l TO 60! LET A=l+(5*< 

+INT <RND*50> ) ) ! IF n/2-INT (n/ 



2> THEN LET A*=A*(A TO A + 4)4-A*l 
TO A-l)*A«(A+3 TO 1! BEEP .01,N 
1480 IF n/2<>INT (n/2J THEN LET 
A*=A«( TO A-l)+A*(A + 3 TO )*A«(A 
TO A+41 : BEEP .01,N+10 
1490 NEXT N: LET P*=A«: CLS : RE 
TURN 

1500 INPUT "PRESS ENTER TO CONTI 
NUE'l LINE 2*: BEEP .05,10: RETU 
RN 

1510 REM END GAME 

1520 PAPER 3: INK l: FOR N=12 TO 
21: PRINT AT M,0i PAPER 31" 

EXT N 

1530 IF RES THEN PRINT AT 13,I|" 

BAD LUCK: THE CARDS DID NOT " 1 AT 

I4,1I"RUN YOUR WAY": FDR N=-10 
TO -30 STEP -l: BEEP ABS N/100, N 
: NEXT N 

1540 IF NOT RES THEN PRINT AT 13 
, 1 ) FLASH l| ■ ! ! ! ! ! WELL DONE ! ! ! 
! ! ! " 1 AT 14, 1 i FLASH 0| "YOUR PAT I 
ENCE IS REWARDED": FOR N-l TO 3: 

FOR M=10 TO 40 STEP 3: BEEP .01 
,M: NEXT M! PAUSE 10! NEXT N 
1550 PRINT AT 16,31 "YOU MAY"1AT 
17,51 "DPLAY AGAIN'JAT 18.51AT 1 
9,3! "21FINISH PLAYING" 
1360 PAUSE 

1370 IF INKEY«="1" THEN BORDER 4 
: PAPER 41 INK 0: CLS : GO SUB 1 
710: GO SUB 1710: GO SUB 1460: G 
O SUB 1500! GO TO 1030 
1580 IF INKEY*="2" THEN CLS | PR 
INT AT 10,01 "START TAPE TO LOAD 
NEXT GAME" : LOAD " " 
1390 PAUSE 0: GO TO 1570 
1600 REM INSTRUCTIONS 
1610 LET T«»- hhBBhhBBSBBhBB 
8h88hhhh88B8B8BB888h8B8fi8B888h88 
BhBBh88BhBB8BB888BBhBB3tiB8BBBh88 
8h88h88Bh88B88BBBBBhB8BhB8888h8B 
8h88hhhh8B8B8888883h8B8hBhhhBh8B 
8h8B?>88B888B8888B88h888fiB888BM88 
BA B8h8888888B8888B8hBBBhBB8B8Bhh 
A88B/7B83BBB88" 

1620 BORDER 2: PAPER 3: INK IT C 
LS : PRINT AT 7,0; BRIGHT I|Tt: 
FOR N=3 TO 13 STEP 10: PRINT AT 
N,BJ INK 0; PAPER 61 BRIGHT 1; F 
LASH 1 ; ■ P A T I E N C E " I NEXT 

1630 PRINT HISAT 0,01 "FOR INSTRU 
CTIONS PRESS ""1""*;AT 1,0;"OTHE 
RWISE AMY KEY': PAUSE 0: IF INKE 
Y*0"1* THEN RETURN 

1640 CLS : PRINT AT 1,3; INK 61" 
11-UP PATIENCE! RULES ": PAUSE 100 
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1630 DIM USI6.30): LET U*(1)="NI 
NE CARDS WILL BE DEALT OUT"! LET 

U*(2)='YOU MUST COVER EITHER :- 
": LET U*i3)="TW0 NON PICTURE CA 
RPS TOTALING": LET U» (4 >= "ELEVEN 

(ACE ■ 1) OR": LET U*(3)*'"A RUN 

OF J-K-B ": LET U-5 
1660 GO SUB 1690: SO SUB 1500: L 
ET U*U)-"IF YOU CAN'T MOVE THEN 

YOU MAY": LET U«(2)-"DEAL A SIN 
GLE CARD INTO THE": LET U*(3)-"C 
ENTRE: CARD (9)": LET U*<4)="IF 
YOU ARE STILL UNABLE TO": LET U« 
(51- "PLAY THEN YOU HAVE FAILED 
AND"! LET U«<6>-"MUST RESIGN": L 
ET U«6 

1670 GO SUB 1690: GO SUB 1500 
1690 RETURN 

1690 FOR N»2 TO 17: PRINT AT N,l 
I PAPER 51 ■ 

" : NEXT N 
J700 LET B-l: FOR N-- 1 TO 3+<U*2> 

STEP 2! FOR M-l TO 30: PRINT AT 

N,M! PAPER 7i INK 1| ■*" : PAUSE 
2: PRINT AT N,MS PAPER 5|U*<B,M) 
: BEEP .01,0: NEXT M: LET B=B+1T 

NEXT N 
1710 REM INIT 
1720 LET A=l: LET CD-0: LET T-0: 



LET FA=0: LET RES=0 

1730 DIM R*(9,5) 

1740 LET B*-"SZJCf" 

1750 RETURN 

1760 REM GRAPHICS 

1770 BORDER 2: CLS ! PRINT AT 10 
,2| "STOP THE TAPE PLEASE" 

17B0 RESTORE 1800: FOR N-0 TO 4: 

FOR M=0 TO 7: BORDER M: BEEP .0 
1 ,N 

1790 read a! poke usr chr* (97«n 
>+m,a: next m: next n: run 

1800 DATA 0,94, 82, 82, B2, 32,94,0 
1810 DATA 0,16,56,124,254,124,56 

1820 DATA 0,108,254,254,124,124, 

56, 16 

1930 DATA 16,56,124,124,254,214, 

84, 16 

1840 DATA 0,36,36,16,214,254,214 

, 16 

1850 RUN 

9990 SAVE 'patlenc«B' LINE 1760 

9992 CLS : PRINT "SUITCH PLUGS A 

ND REWIND TO "'"VERIFY, START 



APE" 



CLS 



Keypanel Kits Keypanel Kits 





for High Flyers... and Early Learners. 



j rl v I ..„■ in rs H,i|..in 
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I ZX APPLICATIONS I 



The Interf ace is compact ai 



Designs For 

Living 



Colin Christmas takes a further look at 
computer art. 



Slid hooked on Graphics? V 



La plume de ma 
micro 



a is always clear. 

m the pen at the 
displayed on the 
s any key. This is 
i by a machine 



rts. usefulness and value lor money determine the co-ordiates re 

itthe vary of course. Recently I've quired for drawing lines, comer! 

phics been using the LIGHT PEN pro- of boxes, centres and cir 

3 RD duced by DK'TRONICS tor the cumferences of circles, defi™ 

The package c 




aC0MPUTINGOCTOBEBfflOVEMBEH1981 



I zx applications! 




musingalightpenc 

sen. Ideally it should go 



is still capable of straining trie 
imagination is PAINTBOX from 
PRINT N' PLOTTER PRO- 
DUCTS. Again, it's now only 



graphic work can be attempted 
using the Precision Plotter sec- 
tion of the program. The fo 
will be familiar. Plot, draift 
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Statacom Distribution Ltd, sole UK 
Distributors of Datafax 3" Disk Drives, 
proudly announce the introduction of the 
New Datafax Spectrum Disk Interface. 

The Interface connector fits neatly into the rear 
expansion slot on the Spectrum via a high quality, 
gold plated card edged connector, and still allows full 
usage of-other peripherals (Printer, Joystick etc). 
A system reset button isalsoincludedinthe Interface connector. 
The disk operating system, designed for the Hitachi 3" disk drive 
uses o n ly 8 K of use r memory a n d gives easy to learn commands 
to run the drive. 

The Interface comes complete with Utility Disk and 
comprehensive Datafax Disk Interface Manual. 
Also suitable for 5 'A " single sided drives. 

Statacom Price £75+ vat ^^4 

As a special introductory package 
Statacom offer the Hitachi 3" Disk 
Drive Unit, complete with Power 
Supply Unit, Utility Disk, leads and ' 

cables plus the new Interface at 

Only £245 +'VAT (Normal R.P. £271 + VAT) 



^ 



•••v-V 



• ..--dcitafax -::: 



COMPETITION 



PRISM 

competition 




COMPETITION 



ke them home and think 
tWwell, this won't lake long', 

Ui find it's a little bit daunting 
ttttartwith. But when you start 
g build the thing you get well 
fldttuly hooked. You find that 
mead of taking an hour, you 



ng together and 
rgood book - y 
■ thing down an 






Mr J Moran from Carterton ii 

Oxon. 

Mr B E Thomas in Bromley, 

Carol Powles of Msrthyr 

Tydfil. Mid Glamorgan. 

R A Mallor from Walsall. We: 

Midlands. 

James Phoenix of 

Middles borough. 

P R Shears of Rolleston in 



UKand Northern Ireland readers 
tl ZX Computing, except 
as of Argus Specialist 



J D Kidd of Clacton in Essex. 

David Lawley of West 

Bromwich. 

Mr N Symes of London. 

Philip Andrews Of London. 

Mr A Landan of London. 

Christopher Pearson of Carlisle 

in Cumbria. 

MckWilford of Charing in 

Robert Hugh Rogei of 

Jamie Seymour of Leeds. 
Colin E Piggot of Leeds. 
N F Owen of Mssenden. 



Kite red ir 
I results an 
•try that the 



it of ZX Com- 
pond e nee will 
vftrt regard to 



he results will be 
future issue of ZX 



11 of Israel. 
Keven Denness of Bideford in 

K M Walsh of Alnwich in 

Northern Ireland. 

Ben Jackson of St Leonards 

on-Sea. 

Ian Jay of Bristol. 

Ian Hilton of Crawley. West 

Tony Buckley of County 

Durham. 

K R Foot of Chossington in 

Surrey. 

J K Marslon of Wimborne in 

Andrew Thomas of Downened 

R A Bameby of Sale in Cheshire, 
and Andrew Broome of 
DolKngton in Cheshire. 



I jumboqram' 
I Competition 
I Results 






Forty lucky winners were: 

Adrian Everett of Plymouth. 
David Clifford of Cheltenham 

Garmany. 

f^ter Glen from Ashby-de-la 

Zouch. 

BJ Kamphuis of The 



entered the competitit 
a tough'en - nothin] 
issue's PRISM comp., 



write a Pun 

The ZX Computing 'v. 



GOSUB AND THEN ARRAY 
STEP INK SCROLL OR dflEM 
CODE - DIM Pice & RAND 
NEW LOAD RED OR. 



lones from Bekhill, East 
klaugh in Coventry. 




j NAME 

I ADDRESS 
I 



I 



is objects in the ZX Computing PRISM Competi-J 



■ (Please number each of the following with a rating from! to5l.| 



Thundersley in Essex, hie wrote: 



~^\ Line Tracer II 

H Piper Mouse 

\ Ivtemocon Crawler 

^] Monkey 

| | Circular 



i 



SPECTRUM BUSINESS GRAPHICS 

AND OTHER SOFTWARE FROM 

McGRAW-HILL 



il full-colour graphics 



modem typeface cai 
e. And many other t 



The Spectrum Word Processor 

All the teatures ol a professional word processor- INSERT, EDIT. 

MOVE. SEARCH AND REPLACE. SAVE and LOAD FILE. etc. with 

ZX printer or full-size printer through a suitable interface. 
The SPECTEXT suile in 

e "ample, personalised m 
Cassette software, micro 
£13.95 Ind. VAT 



£13.95 Incl. VAT 

THE SPECTRUM GRAPHICS MACHINE 



id elegant programs The 100 page fil 

explanalions, and complele assemh 



McGraw-Hill Book Company (UK) Limited, 
Shoppenhangers Road, Maidenhead, 
Berkshire SL6 2QL. Tel: (0628) 23431/2 



PROJECTOR I 07 0B4748 7 

SPECTEXT 07 084713 4 

PROFILE 2 07 0B4741 X 

SPECTRUM 

GRAPHICS 

MACHINE 07 0B4768 1 

I enclose cheque /postal order 



Moreexcitinq 
games for vourZX 
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Met, Plot 

An unusual and impressive way of using the ZX81 
and printer from Henley on Thames inhabitant, 
David Lockyer. 



Although tr 

working, it 



strength and winddii 



POKE16389.1 



ilrin.ity i- 
ds up, not 
it by play- 



this has been done the prograi 
will continue, displaying tr- 
data now stored in C$1445 

enter data into DSI72I; yt 
must enter all the 72 numbei 
shown in Table 2, reading froi 
left to right. Again, the dai 
entered wiil be displayed fi 
checking. 

When you are sure that ft 



:s of bi 
ate Prog ;a 



256 x256 grid held in arra' 
ASI32.256). The plot positioi 
can be moved laterally, vertical 
ly or diagonally about the grii 
using keys "1" to "8". Will 

(ijHijonally in tl- 

symbol shown 



RUN but GOTO 100. Draw a 
few lines, prefecbly following a 



kby using GOTO 99BS. I 



s' 


T 


V 




taaa » 






*; 




3 


*.2 

9 1 








! 6 


fflW 


^ 3 K - 


* in i v 
t 5 ' 
















IDI1 


ian 3 








! H 


1 




'" 1DSB 


H 


wis 
















H 


ISIS 




HK3 rasn 


^ -n IB2G 














, 3 







I except for 



1 REM PROGRAM 1-THIS REM IS 
ESSENTIAL 

2 POKE 16314,50 

3 POKE 16513,142 

4 POKE 16516,64 

5 POKE 16517,95 

6 POKE 16518,50 

7 POKE 16519,143 
B POKE 16520,64 
9 POKE 16521,179 

10 POKE 16522,6 

11 POKE 16523,0 

12 POKE 16524,79 

13 POKE 16525,201 

14 POKE 16526,240 

15 POKE 16527,128 
20 DIM A*(3,256> 
23 DIM C*(445) 

30 DIM D*(32) 
40 DIM V(6) 
45 LET NFB=1 
48 FOR 1=1 TO 31 
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50 PRINT AT 0,0) " INPUT STATID 
N NAME" 

60 INPUT L* 
70 CLS 

80 LET C*<NFB)-CHR* LEN L* 
90 LET C*(NFB+1 TO NFB+LEN LS) 
=L* 
100 LET NFB=NFB+LEN L*+l 
110 FDR M=l TO 6 
120 INPUT N 



a defined plotted on i 



ivoiding completely tl 



130 


LET C*(NFB)=CHR* N 


ameT^ion^cm 


a m 


uare, 1 withinkacross 
8 small be plotted. Afte 


n *" q ¥ ™« 


140 


LET NFB=NFB+1 


iivisions down. 










150 


NEXT M 


Figure 2 shov 
rid should look fo 


a si 


all area think 


Mow you m 


"lateMhe j* 


its 


NEXT I 


round the Stilly Isles; ii 


norefor from 


to 255 




200 


REM PROGRAM TO PRINT C*<445 




Mcs — they IX-a 


is I. and fro 


n255to0fral 






will be discussed 1 




he grid top 




down one si* 






s shown marked fo 


Salty, (Y-a 


is). For e 




205 


LET P=l 


astnet and Lundy. an 








210 


LET L*=C*(P+1 TO P+CODE C* C 


or Channel Ligh 




sel and poin 






P) ) 


PRINT L* 

LET P=P+l+CODE C*(P) 


ersey. 




co-o 


dinates. U 


se Program I 


220 

230 


Contents of array C$ (4a5> 




240 


FOR N=I TO 6 












250 


LET V(N>=CODE C*(P) 


TIREE 




DX,DY 
74 176 


NX.NY 
13 74 


DC,DR 
1060 


260 


LET P=P+1 


SUMBURGH 




169 236 


21 26 


22 20 


270 


NEXT N 


BELL-ROCK 




161 171 


20 90 


21 65 


280 


PRINT TAB 6;V(l)j" "jV(2>;T 


DOWSING 
GOEFIEE 




166 117 
201 84 


24 131 


24 139 
26 172 


AB 16;V(3)|" "|V(4)|TAB 26jV<5)| 


VARNE 




194 61 


26 187 


25 135 


" " (V<A) 


ROYAL SOVEREIGN 


177 50 


22 206 


23 206 






CHANNEL LV 




11340 


19210 


15216 


290 


NEXT M 


SCILLY 




65 44 


12 220 


9212 


295 


PAUSE 200 


VALENTINA 




34 85 


7 179 


5 171 


300 


REM PROGRAM TO LOAD DSC 72) 


RONALDSWAY 




113122 


15 126 


1 5 1 34 


305 


CLS 


MAUN HEAD 




81 160 


1497 


11 96 


JERSEY 




11329 


18 227 


15227 


3BS 


PRINT "ENTER NUMBERS FROM T 


VIKING 




204 238 


26 9 


26 18 


ABLE 


2" 


FORTIES 




204 192 


25 64 


26 64 


310 


FOR M=l TO 72 


CROMARTY 
TYNE 




172 205 
172 155 


21 51 

22 1 10 


22 51 
22 101 


320 


INPUT N 


DOGGER 




204 146 


26 101 


26 no 


330 


PRINT AT 0.0: "NO. OF VALUES 


FISHER 




236 170 


29 86 


30 85 


ENTERED INTO D*" ; " = ";M 


GERMAN BIGHT 
HUMBER 


236 135 
220 117 


31 112 
28 147 


30 121 
26 139 


340 


LET D*(M)=CHR* N 


SOLE 




36 14 


6 233 


5 242 


350 


NEXT M 


LUNDY 




100 84 


14 181 


13 172 






FASTNET 




68 61 


10 186 


9 195 


400 


REM PROGRAM TO PRINT D* 


IRISH SEA 




108 100 


15 147 


1 4 1 56 


410 


LET P=l 


SHANNON 




12 98 


3 167 


2 158 


420 


FOR N=l TO 29 STEP 4 


ROCKALL 
MALIN 




12 176 
60 149 


3 89 
9 98 


2 80 
8 107 


430 


PRINT TAB N;CODE D*<P)j 


HEBRIDES 




76 217 


11 30 


10 39 


440 


LET P=P+1 


BAILEY 




28 241 


56 


4 15 


450 


NEXT N 


FAIR ISLE 




132 239 


18 8 


17 17 


460 


PRINT TAB 1; " " 
GOTO 428 


Table t 










470 








Contents of array D$ (72) 




you experim 


em in this way, be paper, and divide the lopaxis by 


32 


64 


255 64 


32 





careful to en 


er as a direct com- 8 to produce a grid of 32 x 256 












mand. 


divisions, corresponding to the 
elements of the AS (32 ,256 1 ar- 


4 


2 


255 2 


4 





DIM AS (32, 256) ray. Label the large divisions 1 to 


30 


6 


10 18 


32 


64 






120 


96 


80 72 




2 




256 from top to bottom. You 
draw a large areas defined by the co- 


2 




72 80 


96 


120 




64 


32 


18 10 


6 


30 G 


Next, 


92 


98 


114 2 


34 


28 


256 «256 grid of squares, or ordinates held in CS 144 51 and 


Table 2 












jire some graph- listed for each station as DC, DR 
























90 
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1 REM THIS LINE HOLDS M-CODE 
FROM PROG 1. 

2 SAVE "METPLDT" 

3 FAST 

20 IF PEEK 1638S+256*PEEK 1639 
9=31744 THEN GOTO 28 

23 PRINT "MEMORY NOT RESERVED. 
IT WILL NOWBE RESERVED FOR YOU. 
JUST RELOAD AFTER A 5H0RT PAUSE 

24 PAUSE 1000 

23 POKE 163B9.124 
27 NEW 
2B FAST 

29 FOR I=B TO 112 

30 POKE 31744+1, PEEK (2161+1) 

31 NEXT I 

32 POKE 31800,63 

33 POKE 31857,201 
36 SLOW 

100 PRINT "ENTER START CO-ORDIN 
ATES" 

120 INPUT X 

130 INPUT Y 

140 GOSUB 9980 

145 SLOW 

150 PRINT AT 0,0;" CO-ORDINATES 
OF LAST POINT PLOTTED" 

160 PRINT AT 2.10J "X="iX; " Y=" 
jY|" 

170 LET I*=INKEY* 

180 IF I»="" THEN GOTO 170 

190 LET Y=Y-<I*="3">-<I*="6">-< 
I*="4")+(I*="1")+(I*="7")+(I«="2 
") 

20 
I*=" 

210 GOTO 140 
9970 REM PLOTS <X,Y) INTO A* 

9980 FAST 

9981 IF X<0 OR X>255 OR Y<0 OR Y 
>255 THEN RETURN 

9982 LET C=1+INT tX/8) 

9983 LET R=256-INT Y 

9984 POKE 16526, CODE A*(C,R) 
99B3 POKE 16527, 2**<B*C-INT X-l) 

99S6 LET A*(C,R)=CHR* <USR 16314 

9987 RETURN 

99B8 FOR 1=0 TO 256 STEP 8 

9989 FDR J-l TO 32 

9990 FOR K=l TO B 

9991 POKE 32235+K+8*(J-l) .CODE A 
*(J,K+I) 

9992 NEXT K 



9993 NEXT J 

9994 FOR H=0 TO 31 

9995 POKE 16444+H,H 

9996 NEXT H 

9997 LET HPRINT=USR 31744 

9998 NEXT I 



ffh 




Fig. ' b The outlines of I 



■;:: £ 

I 

' +■ 

I I L 
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SAVE IGOTO 2) and print start again from where th 
[GOTO 9988) frequently from off. 

now on, and certainly after com- When all the outlines 
puling each major land mass. been entered add Program 
For the islands you should, of run it using GOTO 821 5 t 


"ia 


started, with the correct co- Your print should now lo< 
ordinaies displayed on the Figure lb, with gaps i 

panic 1 it is possible, with a little The rest is easy! Amei 
artistry, to finish at the right program so fat entere 

the odd dot' in the wrong place gram 4. SAVE this defi 
can often be removed by the version using GOTO 2. 


id the 
<J by 


LET AS 


lm,nl = CHRS pi 


ot the graphics. The nur 


■•?.:, 


P,„ tJ ,,„ 


3 










8212 


REM DRAWS BORDERS 






8215 


FAST 








B220 


LET Y=255 








8230 


FOR X=0 TD 


255 






8240 


GOSUB 9980 








8250 


NEXT X 








B260 


LET X=255 








B270 


FOR Y=0 TD 


255 






8280 


GOSUB 9980 








8290 


NEXT Y 








8300 


LET Y-0 








8310 


FOR X=0 TD 


255 






B320 


GOSUB 9980 








8330 


NEXT X 








5340 


LET X=0 








e.350 


FOR Y=0 TO 


255 






8360 


GOSUB 9980 








8370 


NEXT Y 








B3B0 


STOP 







1 REM THIS LINE HOLDS M-CDDE 
FROM PRDG 1. 

2 SAVE "METPLDT" 

3 FAST 

6 LET 8=9970 

7 LET F=3 

8 LET A=2000 
10 LET FL=0 

20 IF PEEK 163B8+256*PEEK 1638 
9=31744 THEN GOTO 28 

23 PRINT "MEMORY NOT RESERVED. 
IT WILL NOWBE RESERVED FOR YOU. 
JUST RELOAD AFTER A SHORT PAUSE 

24 PAUSE 1000 

25 POKE 16389,124 
27 NEW 



28 FAST 

29 FOR 1=0 TO 112 

30 POKE 31744+1, PEEK (2161+1) 

31 NEXT I 

32 POKE 31800,63 

33 POKE 31857,201 

36 SLOW 

37 PRINT "THIS PROGRAM TAKES 
BAROMETRICPRESSURES.WIND DIREC 

TIONS AND FORCES GIVEN IN THE 
BBC WEATHERREPORTS FOR COSTA 
L STATIONS AND SEA AREAS AND P 
RINTS THEM ON A MAP OF THE UK." 



39 PRINT "PRESS ANY KEY TO STA 
:T" 

40 PRINT 

41 PRINT "THEREAFTER ENTER ""A 
" TO STOP AT ANY TIME" 

42 PRINT 

43 PRINT "NEVER ENTER "" RUN 
"OR "" CLEAR ""OR YOU WILL LOS 

: THE MAP AND HAVE TO LOAD AGA 



IN 



44 PAU5E 50000 

45 CLS 

46 LPRINT 

47 PRINT "ENTER PRESSURES AS M 
ILL I BARS (WHDLE NUMBERS) E 
-G. 1032",,, 

48 LPRINT "ENTER PRESSURES AS 
MILLIBARS (WHDLE NUMBERS] 
E.G. 1032",,, 

49 PRINT "ENTER WIND DIRECTION 
TO NEAREST 1/B TH. IE. N,NE,E,S 

E,S,SW,W,NW OR ""VAR"" FOR A VAR 
IABLE WIND OR FOR CALM",,,, 

50 LPRINT "ENTER WIND DIRECTIG 
N TO NEAREST 1/8 TH. IE. N,NE,E, 
SE,S,SW,W,NW OR ""VAR"" FDR A VA 
RIABLE WIND OR FDR CALM",,,, 

51 PRINT "ENTER WIND FORCE AS 
A DIGIT 1 TO 12 OF BEAUFORT SCALE 

- USE FORCALM. " 

53 LPRINT "ENTER WIND FORCE AS 
A DIGIT 1 TO 12 OF BEAUFORT SCAL 
E - USE FDRCALM. " 

55 PRINT "OR IF YOU PREFER ENT 
ER FORCE IN KNOTS OR MPH. (WHOLE 
NUMBERS) ", , , 

57 LPRINT "OR IF YOU PREFER EN 
TER FORCE IN KNOTS DR MPH. (WHOL 
E NUMBERS) ", , , 

60 PRINT "NOW ENTER MONTH, E6. 

- SEPT"," " 
62 INPUT M* 

64 IF M*="A" THEN STOP 
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66 PRINT "THEN ENTER DAY (NUMB 
ER)",, , 

68 INPUT D 

70 PRINT "AND TIME, EG - 1800" 

72 INPUT T 

74 PRINT 

76 PRINT "AND THE YEAR" 

78 INPUT Y* 

80 IF Y*="A" THEN STOP 

81 CLS 

82 PRINT "DO YO WISH TO HAVE A 
LIST OF THEDATA THAT YDU ARE EN 

TERING?",,," ( ANSWER Y OR N >" 

84 INPUT N* 

85 CLS 

86 IF N*="Y" THEN LET FL=1 
88 IF N*="A" THEN STOP 

S9 IF FL=0 THEN SOTO 95 
92 LPRINT "STATION/", , "SEA ARE 
A" 

94 LPRINT 

95 LET SUM-0 
97 LET P=l 

100 LET N=0 

110 LET SUM=SUM+1 
1310 LET L*=C*(P+1 TO P+CODE C* ( 
P) > 

1320 LET P=P+l+CODE C*<P> 
1330 FDR M=l TO 6 
1340 LET V<M)=CDDE C*<P) 
1350 LET P-P+l 
1360 NEXT M 
1370 LET DX=V<1) 
1380 LET DY-V<2> 
1390 LET NX=V<3) 
1400 LET NY=V<4> 
1410 LET DC=V<5) 
1420 LET DR=V(6) 

2000 CLS 

2001 IF SUM>13 THEN GOTO 2060 

2002 PRINT AT 0,4j "ENTER PRESSUR 
E FOR :-" 

2004 PRINT AT 2,4;L* 

2005 INPUT N* 

2006 IF N*="A" THEN STOP 

2007 GOSUB F#A 

2008 FOR 1=0 TO (LEN N*-l>*6 STE 
P 6 

2010 LET N-N+l 

2020 LET DX-DX+I 

2030 LET V*-N*(N) 

2040 GOSUB 3000 

2045 LET DX-DX-I 

2050 NEXT I 

2055 IF SUM>13 THEN RETURN 

2060 PRINT AT 0,4; "ENTER WIND DI 

RECTION FOR !-" 
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2064 PRINT AT 2,4;L* 

2065 INPUT W* 

206S IF W*="A" THEN STOP 

2070 CLS 

2080 GOSUB 7000 

2082 IF FL=0 THEN GOTO 2090 

2083 LPRINT 

2085 LPRINT L*;TAB 19;N*{TAB 29; 
W* 

2090 IF SUM=31 THEN GOTO 2600 
2100 IF 5UM=13 THEN GOTO 2700 
2500 GOTO 100 
2600 CLS 

2602 PRINT "ALL DATA SHOULD NOW 

HAVE BEEN ENTERED. ",,,, "TO PRI 

NT THE MAP ENTER " "P"" , " , "TO RES 

TART THE PROGRAM ENTER "■ , R""OR E 

NTER ""A"" TO STOP" 

2605 INPUT N* 

2607 CLS 

2610 IF N*="P" THEN GOTO 9950 

2620 IF N*="R" THEN GOTO 3 

2630 IF N*="A" THEN STOP 

2640 GOTD 2602 

2700 PRINT "DATA FOR COASTAL S 

TATIONS HAVENOW HAVE BEEN ENTER 

ED.",,, "IF YOU WISH TO PRINT THE 
MAP ENTER ""P"",",,"TO CONTI 

NUE ENTERING SEA AREA DATA ENT 

ER "»C"" OR ENTER ""A"" TO STOP 

2705 INPUT N* 

2710 LPRINT 

2720 IF N*="P" THEN GOTO 9950 

2730 IF N*="C" THEN GOTO 100 

2740 IF N*="A" THEN STOP 

2750 GOTO 2705 

3000 IF V*<>"5" AND V*<>"6" THEN 

GOSUB 5100 
3010 IF V*<>"2" THEN GOSUB 5200 
3020 IF V*<>"1" AND V*<>"4" THEN 

GOSUB 5300 
3030 IF V*="2" DR V*="6" OR V*=" 

8" OR V*="0" THEN GOSUB 5400 

3040 IF V*<>"1" AND V*<>"4" AND 

V*<>"7" THEN GOSUB 5500 

3050 IF V*<>"1" AND V*<>"7" AND 

V*<>"0" THEN GOSUB 5600 

3060 IF V*<>"1" AND V*<>"2" AND 

V*<>"3" AND V*<>"7" THEN GOSUB 5 

700 

3070 RETURN 

5100 LET X=DX+F 

5110 FOR Y=DY-F TO DY 

5120 GOSUB B 

5130 NEXT Y 

5140 RETURN 

5200 LET X=DX+F 

5210 FOR Y=DY-F-F TO DY-F 
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5220 GOSUB B 

3230 NEXT Y 

5240 RETURN 

5300 LET Y=DY 

5310 FDR X=DX TO DX+F 

5320 GOSUB B 

5330 NEXT X 

5340 RETURN 

5400 LET X-DX 

5410 FOR Y=DY-F-F TO DY-F 

5420 GOSUB B 

5430 NEXT Y 

5440 RETURN 

5500 LET Y=DY-F-F 

5510 FDR X=DX TO DX+F 

5520 GOSUB B 

5530 NEXT X 

5540 RETURN 

5600 FOR X=DX+1 TO DX+2 

5610 LET Y=DY+F 

5620 GOSUB B 

5630 NEXT X 

5640 RETURN 

5700 LET X=DX 

5710 FOR Y=DY-F TO DY 

5720 GOSUB B 

5730 NEXT Y 

5740 RETURN 

6000 REM UNPLOT 

6010 FOR C=DC TO DC+2- <5UM>13> 

6020 FOR R=DR TO DR+F+F 

6030 LET A*(C,R)=CHR* 

6040 NEXT R 



7243 PRINT AT 2,4jL* 
7245 GOSUB 6000 
7250 INPUT N* 
7255 LET N=0 
7260 GOSUB 2008 
7270 RETURN 

9950 LPRINT 

9951 LPRINT D; " ";M*;" ";Y*[" AT 
"|T|" HOURS, SMTi-"," " 

9955 LPRINT 

9956 CLS 

9957 PRINT "USE GOTO 36 TO RUN A 
GAIN" 

9958 FAST 
9960 GOTO 9968 

9970 REM PLOTS(X,Y> INTO A* 

9980 FAST 

9981 IF X<0 OR X>255 OR Y<0 OR Y 
>255 THEN RETURN 

9982 LET C=1+INT (X/8> 

9983 LET R=256-INT Y 

9984 POKE 16526, CODE A*tC,R) 

9985 POKE 16527,2**(a«C-INT X-l> 

9986 LET A*(C,R)=CHR* 1USR 16514 
) 

9987 RETURN 

9988 FOR 1=0 TO 256 STEP 8 

9989 FOR J»l TO 32 

9990 FOR K-l TO 8 

9991 POKE 32255+K+8*(J-l) .CODE A 
*{J,K+I) 

9992 NEXT K 



6045 


NEXT C 


9993 NEXT J 




6050 


RETURN 


9994 FOR H=0 TO 


31 


7000 


IF W*="A" THEN STOP 


9995 POKE 16444+H.H 


7005 


LET W«0 


9996 NEXT H 




7010 


IF W*="E" THEN LET W=l 


9997 LET HPRINT= 


USR 31744 


7020 


IF W*="S" THEN LET W=9 


9998 NEXT I 




703B 


IF W*="W THEN LET W=17 
IF W*="N" THEN LET W=25 






7035 




M.&SK33&EI 


7040 


IF W*="NW" THEN LET W=57 


rouline at line 9970. taking X 


7030 


IF W*="NE" THEN LET W=49 


and V co-ordinates from array 




7060 


IF W*="SW" THEN LET W=33 


Table 1 as DX,DV. Each digit is 


O, selected codes are retrieved 


7070 


IF W*="SE" THEN LET W=41 




from DS172I which, whon 


7080 


IF W*="VAR" THEN LET W=65 


lion of seven segments, in much 


AS (32,256)is printed. will give 


7090 


TF W=0 THEN PRINT "ND SUCH 


the same way that digits are 
displayed on calculators and 


see how this worts^ro^Rtu* 


MIND 


DIRECTION. *«* TRY 


watches (see Figure 2), They 


3 . The arrow for Scilly in Figure 


ASA IN »**■' 


are as small as legibility would 


2 has been enlarged to show 


7093 


IF W=0 THEN INPUT W* 


3 or 4 digits, and wind strength 


that the pattern of dots cor- 


7095 


IF W=0 THEN GOTO 7000 






7100 


FOR 1=1 TO 8 




DSII7-24I when assigned to 


7110 


LET AS(NX,NY+I-1)=D*(W+1-1) 


entries. By making sure that all 


A$t12,220-227) respectively, 
There is no need for an 'unplof 






of the 32 "256 grid, the 




7120 
7130 


NEXT I 

IF SUM<=13 THEN RETURN 


simplest way of 'unplotting' 
relevant elements. The sub- 


again, the program will have the 
effect of over-writing the 
previous symbol. 


7240 


PRINT AT 0.4: "ENTER WIND FO 


routine at line 6000 does this. 


When you are ready to uss 


RCE FOR :-" 


using co-ordinates DC.Dfi 
retrieved from CSI445I (Table 


Program 4, Table 3 provides a 

list ot representative data for at 


7241 


PRINT 


1). 


the Coastal Stations and Sst 
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ZX81 EDUCATION 



J V loan i / 



t 



in iT-i? _/. i 







Station /Sea Area 

TIREE 

SUMBURGH 

BELL-ROCK 

DOWSING 

GOEREE 

WARNE 

ROYAL SOVEREIGN 

CHANNEL LV 

SCILLY 

VALENTIA 

RONALDSWAY 

MAUN HEAD 

JERSEY 

VIKING 

FORTIES 

CROMARTY 

TYNE 

DOGGER 

FISHER 

GERMAN BIGHT 

HUMBER 

SOLE 

LUNDY 

FASTNET 

IRISH SEA 

SHANNON 

ROCKALL 

MALIN 

HEBRIDES 

BAILEY 

FAIR ISLE 



I 020 


w 






1020 




1017 




1014 


SW 


':fj2 3 


W 




VA4 


1 


VAH 



and, if you feel up to it 
lis effort, you could try 
le isobars as in Figure 





■TT'T'"™ , , 


— ESS 


„,,„ 


















. - 












■ 


















■ 
































■ 














■ 






































fig. 3 The Mind direction anon tor SciUy enlarged from fig. 2. 
ASI32.256), form the chosen symbol 



i9 MOR 1983 fIT 1200 HOURS , GMT : 




TT1? 7^ 



* jM f ) \ 3 * 




PRINTS instructions; requests INPUTS. 

Variable SUM is used to count the numb 

Coastal Stations /Sea Areas processed. 
1 00-2500 Main processing loop. 

1310 LS holds the name of Coastal Station/Sea 

Area retrieved Irom C$14451. 




ZX81 














Sub-routine, called at line 7260, which 




transfers wind-force digit to AS (3 2 .2561. 










2090 


Leave loop if all Coastal Station data has 


2100 


Leave loop if all Sea Area data has been 




Subroutine of logic gates which examine trte 




















at 9970 to plot each segment of the requite' 










7000-7270 


Sub-routine of logical gates to set variable W 



D5 17 2: i he rndc which produces 

ASI32!256lby lines 7 1 00-7 1 20 

printed. 

RETURN if Coastal Station data is 



a from C$1445). 



INPUT of b; 
GOSUB60' 



9970-9998 Sub- 



FLOPPY DISK SYSTEM 
FOR SPECTRUM 

FLOPPY DISK SYSTEM FOR SPECTRUM 






r new mode 


- BETA DISK Is even belter 








Disk Opera 


nQ System in EPROM 


* 


Uses ONLY 


iv BASIC programs 










3 l, ii n ■-■■"-. hi 












Up to 1 .6M 


>yles storage 




Haiidj'- J( 






BASIC prog 






Duplicated 






Password p 


£85.00 ex VAT 

£2.00 p&p 



1? 



Technology Research Limited 

Unit IB Central Trading Estate, 

Staines, Middlesex 

Tel: Staines (0784) 63547 



HIRE SPECTRUM 
SOFTWARE 



OYER 2S0 ■■-■<■:'-' ■!.!■,*!■ ifir hir 
,.i:i ,j ARCADE. ADVENTURE. 
INE5S. EDUCATIONAL '■ :•■ I i 



KVH*«i|illl 



: H 



L'.'MHIMJ 



«r members for j small I 



NMIONM SOFTWARE UBRARY 
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■SOFTWARE REVIEWS* 



The ZX81 soft 
selection 

Nick Pearce looks at some new releases 
for the ZX81 



Merchant of Venus 
crystal Computing 




A fair game. 

The Software Farm is at 
aigo Farm. Botany Bav. M 
- "went. W 
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The computerised n °' , rB 

Diet m s 1on 

SOftChOICe Ltd. Consequently 



(eight changet 
;e weight. The lbs, which would reqi 
Computerised Diet might be of calorie intake of 2100 " 
This progr 
aiised' program, so after ing'i 
asking for your name, it goes on Upon 

to ask your current weight and weight in pounds. Iwastr. 
height, and your sex. Incidently, I needed a weight change of 
it was at this stage that I made lbs., and a calorie intake 
my first mistake, of the classic 2100 calories daily. The ni 



AXIS S0FTLUHH9 

ZX 81 - for IK | 

8UMPCR 7 




Speedsnake are sold in England 
by Softchoice Ltd, 52 Flatts 
Lane. London NW3 7 NT. 



ZX81 UTILITY 



List Option 

Stephen Bugg's makes the 
ZX81 LIST like a Spectrum. 



Operating 
instructions 



RUM 1 000 and GOTO 1 000 w 



i-lf.il wi 



le number (say 9000). and to 
e loaded into your computer 
id left there before each pro- 



bbbXb. 



Check il p 



position in line. 

Character 1 26 [NUMBER1 follows a 

memory, and this is in turn followec 






Loop for each line in progran 
SCROLL ROUTINE 
Load B with Print column. 
Set Print position to correct | 
above previous position. Aft 

PAUSE ROUTINE 

" Q" is pressed . 

FIND FIRST DESIRED LINE 

Read line number. 



Line number (1 020 and 1 1 40) and Li 
length (1040 and 1 1651. 
String to prim out line length. 
Counter for line length. 



1 000 will cl 



START LIST asks for 

line that is to be printed. 9B00-9999, bu! 

END LIST asks for the last line will also need lo b. 

that is wished to be printed. the variable nai 

The program will now list the changed if the sa 

lines belween these two line used by the progr 

numbers inclusive, it will not not be changed. I 

Pause Routine is called, this 
done by pressing the "S" ke 
the Pause is disabled by tl 

1000 PRINT "START LIST " 

1001 INPUT ST 

1002 PRINT "END LIST " 

1003 INPUT ED 
1005 LET X=16509 

100B LET DFILE=PEEK 16396+256»PE 
EK 16397 

1009 IF ST>1 THEN GOTO 1140 

1010 IF X>=DFILE THEN STOP 
1015 SCROLL 

1020 LET Y=PEEK X*256+PEEK <X+i> 

1022 IF Y>ED THEN STOP 

1025 LET Y*=STR» V 

103B PRINT AT 20,(4-LEN Y*);Y*[T 

AB (5>; 

1035 LET X = X + 2 

1040 LET Y=PEEK X+PEEK <X+1>*256 

1045 LET X=X+2 

1050 FOR Z=0 TO Y-2 

1053 IF INKEY*="S" THEN GOTO 112 

5 

1055 LET A=PEEK (Z+X) 

1060 IF A=126 THEN LET Z=Z+5 

1065 IF A=126 THEN GOTO 1085 

1070 PRINT CHR* (A) j 

10B3 IF PEEK 16442=3 THEN GOSUB 

1105 

10B5 NEXT Z 

1090 PRINT 

1095 LET X=X+Y 

1100 GOTO 1010 

1105 LET B=PEEK 16441 

1110 SCROLL 

1115 PRINT AT 20,33-B; 

1120 RETURN 

1125 IF INKEY*="Q" THEN SOTO IBS 

a 

1130 GOTO 1125 

1140 LET Y=PEEK X»256+PEEK (X+l) 

1145 IF Y>=ST THEN GOTO 1010 

1160 LET X=X+2 

1165 LET Y=PEEK X+PEEK (X+l)*256 

1170 LET X=X+Y+2 

1175 GOTO 1140 



ZX81 CAME 



Unl 



many maze /ghost -chase 

such games. The three indepen 

average amount of intelligence. 

tra lives allowed, experienced 
arcade players will need many 
plays before being able to clear 

Most of the program func- 

in BASIC 



Compac 

Liverpudlians JD Rogers and C Hogg 
have produced yet another winner 
with this definitive Pacman type game. 




'full-strength' f 
When kille 



If you happen to break the 


Storing mazes in a 
five bit code 


stead of zeros and provide occa- 
sional visual landmarks forevm 


program, don't press RUN or 




On first running the program 
















ings of characters! would re- 


















prone total of over four thou- 




a clear toerasethelargearrays 


sand black and white blocks to 




that are used and so drastically 








mazes are held in the form of a 










you through tunnels. Maze X\ 







Screen Points Appearance 


Tunnels Title 


to g ente S r'the°char 9b t' ; r kSDa 'd n d 


order Only three program lines 
are needed for this (772-7741. 


AIGI 500 Grey 
BIH) 2,000 Stripes 
C(l) 4,500 Grey 
DIJ) 8.000 Quilted 
E(K) 12,500 Grey 
F(U 18,000 Psychedelic 


2 (4 + HI Easy Street. 

3 (4+-H) Skid Row. 

4 (4-t-HI Mr. P. Acne. 
2 + H (4 + HI Roundabouts. 
Nonel4+HJ Claustrophobia. 
2 (4 +H) Open-Field. 


to represent certain numbers, 
not having a Sinclair code. Hex- 
possibility, but this only offered 


Concerning Bug 
movements 

The programming of (what 
enemy 'pac's' is not as simple as 


Table 1. Summary of screens {brackets indicate Second set' semens). 
H indicates Horizontal tunnel. 


through characters A to V to 


co™\T written on^llfl 






3 1 . Full stops can be used in- 
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ptrson may I 



naturally 
take different route 
luring play. 



Itch v°u. Another typical 

they are liable to stay in a 
f behind the player, again 
((faring no real challenge. 

" interesting test for any 
ioye algorithm is a U' 

topologJcally eouiva lent t o a ' U ' . 
Ttke a look at some commer- 
cal/arcade mazes - U shapes 
-oided, except at the 



I the 






tkion that can cause trouble. 

The system used in this pro- 
yram is shown on the flowchart. 

ing in all four directions, but 
these are only called in response 
lo a series of checks. The ob- 

plaveHine and player column are 
for paths further afield. Forcom- 



• and flags (bytes a 

machine code rem line!. T 
formation qn pack 'A' i 
shifted into the pac 

. sition and tU 
•re replaced into 



i. This 






repeated for pac's 

Despite all three pac's using tnf 

i algorithm, they hardh, 

follow the same paths as 

each other. This is because eacf 

s programmed to regarc 



Use of RAND seed 




ZX81 CAME 



'RAND' functioi 
efficient means 



the BASIC 
to the Machine Code. Changes 
in A' (across) only affect the 
low byte of the RAND seed, so 
this represents player column, 
while changes in 'D' (down) are 
multiplied by 256 and will 
therefore affect only the high 
"'"'" represents player 



e. The mac 







which is not tixed. 


Do not attempt to alter line 


characters 


nto a five-bit binary = 1 . Mazes should be left-right- 


Typing in — 

IMPORTANT 


numbers between zero and 400 


number, ie 


dot = 0, Maze wall symmetrical. 


line 90 to 'GOTO' certain preset 
lines. Check lines 265 and 395, 


The Basic 


• Type in. as line 1, a Rem state- 


and lines 870 and B90. 


7-90 


Players move routine. 


ment containing ex acr/y 101 of 




30 


If character at Intended Position is anything other 




Customising 




than a dot or a space then GOTO further checks 








at line 100. otherwise: 


'PRINT PEEK 16511'. If the 




40-60 


Blank out previous position, POKE player onto 








screen at new position, update S. 


length is wrong and must becor- 




70-80 


Update Line-Column variable (LC) then use this 




changing tine 840 to read 'LET 




as seed for RAND Isee text). 


• Duplicate line one, four times 


A=136'. 


90 


Calls machine code to move the three 'ghosts' 


by editing its line number to 2, 


Some people prefer the ar- 




and do screen checks, then "goes to' one of the 




cade type of free-running con- 




following lines: 


• Type in the hex loader, men 






Normally line 5 


run 9000 and enter thehax data 






If player has been hit by ghost — line 300 


one line at a time including the 








check figures (but not the 


move in the same direction. This 






spaces). The loader will in- 


can be obtained by adding: 5 IF 


110 


If player hits one of the 'trigger lines' (consisting 


tercept errors of any kind and 


CODE INKEVS + ABS (D) Al 




f o CHRS 2 1 ) above and below the maze area 


prompt you until you get it right! 


4 THEN GOTO 20 




then a "tunnel" move is performed by setting 








to either 21 or minus 21 (depending whether 


confusing B's, 8's, B's and 5's, 


trol keys to those you feel most 




player is at top or bottom of screen). Upon re- 


therefore we have redesigned 


comfortable with by changing 




entering The main loop, D now alters the players 


parts of the ZX8 1 character set 






position by means of line 20 (to re-emerge from 


to look less ambiguous on the 






the opposite tunnel) and also updates 'LC' to suit 


ZX printer. 


add an extra effect) add ' + 
RND' to line 50. Custom points 




by means of line 70. 


•Type in main program, erase 


2 and 6 also slow down the 


Note 




For desperately bad players 


Only the to 


ver trigger line is actually visible on thescreen. the other 


■ Check the mazes, if you spot 


the final figure m line 1 00 can be 




n the program [line 99991 which since it is the very last 




changed to 5. This gives the ad- 




program area of memory is effectively one line above 


then you have made a mistake in 


vantage when turning corners to 




display file — Refer to memory map in ZX manual). This 


entering the code for that maze 


you rather than the ghosts, and 


leaves mor 


room on screen for the actual game. 


so check in lines 710 to 760. 




200-290 


When a screen is cleared updates score, adds 








.:-'::th'T . '- ! :■■■■,!.'. ■■' !<:.,' ' 11 r.-ii :'■,!■„: 


Unlike normal Rem state- 


running against a wall for a 




screen four), pauses, does 'rollover' effect then 


ments, line 9999 is not optional. 






prints next mazes and resets players position. In 


since it forms one of the 'trigger 


A proper pause facility (for 




the unlikely (!) event of a player clearing thesixtfi 


lines' used for tunnel 


when the phone goes or yo u suf- 






movements (see later). Also, 


fer a sneezing fit at a crucial 


270-280 




please consider the following 


stageof play) can be obtained by 




players starting position. 




adding: 15 IF INKEYS = "P" 








THEN PAUSE 4E4. 


Note 






If you would prefer the player 






inverse spaces. 




One is added on to LC during screens one and two, thus slightly 


• Lines 700-800 are best 


after being killed las in arcade 


disorientating the ghosts since they now 'see' the player as being 




type) then relocate line 270 to 




o the side of his real position. This is done to make the 


that these contain letter O's, not 


371 and line 280 to 372, eras- 




reens slightly easier, then in screen 3 onwards the 




ing the originals of course. 


ghosts con 


e up to 'Full strength'. 


• Line 250 - inverse 'MAZE' 


To encode your patterns of 


300-395 


When player is hit takes away one life, flashes 1 








both the player and the life that is being used up. 


use an inverse space. 


should start at column sixteen of 




User call then returns ghosts to starting 


• Line 9070 (part of Hex loader) 






positions. If all lives used up ends game. 


- inverse 'ERROR'. 


ting each group of five 


400-480 


New game, resets various variables. 



OCTOBER/NOVEMBER'S 









SCO 


Selfsave and setting up. 




030-640 


Sets up arrays to hold mazes and maze data 






70O-77O 


















D 






thirty one are represented as full stops and X's 








respectively. 
















This consists of three nested for-next loops: 




position (one in high byte - * 256 - the other 




M loop — for mazes one to six. 




in low byte) for reference by machine code. 












loop - extracted from each storage string. 


Other varia 










540 


Alters the characters used to build certain mazes 


sc 








LYF 




530 




MZ 










Marks start of display File in memory. 




symmetrically to the left and right. 


SS 


The "Second set" of mazes are produced if this 


320 










been built up, line 940 then adds ends' to that 


SS 11 to 6) 














appropriate maze array (MS). 




Maze strings, into which actual mazes are built 



Repeatedly 
spaces BS intoi 

Shifts the data i 



Decoder variables. 



Machine c 



p pacs in starting posit lor 



40AF-4OBC Scan v. 



n for remaining dots, if none i 
to Basic with value of 200, 
d as the 'GOTO' value in line 



40F3-40F6 
2-41 3F 



'player' character then player mi 
If so, jumps to routine at 40F7 v. 
all the pacs, replaces them at sta 



Set working flag Sets v, 
flag (4290) according tc 



(see flowchart! 
Try move towards player line. 
Try move towards player column. 
Movement routines for all four direr. 

updates pac line/column and resets 

Column scan. Scans pac column u[ 
find horizontal access to player coli 



HFF-4259 
«68-end 



Line scan. As for column scar 

I eft/ right and the shorter of fr 
Various stores. Information ft 
a standardised order: pac 1 , [ 
each bug; two positions, colu 
chrS for replacing behind. 

Working store holding inform. 



i, Flag byte, 
read only) 



decode bit 4, and so on 

before being placed into 
Code for character produce 




BASIC program listing. 



10 LET D=(INKEY*=" 



-<INKEY*= 

-<INKEY*= 



40 POKE S,0 

50 POKE IP, 61 

60 LET S=IP 

70 LET LC=LC+D+(256*A) 
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80 RAND LC 
90 GOTO USR 16559 
100 IF PEEK IPM35 THEN GOTO 90 

110 IF CHR* (PEEK IP>="«" THEN 
LET D=21~<42 AND IP>X) 
120 IF PEEK IPM1B THEN LET A= 
31- (62 AND PEEK (IP-32X7B) 



200 REM NEXT SCREEN > 

210 LET SC=SC+500*<MZ**2) 
220 LET LYF=LYF+l+(4 AND MZ=3)+ 
(11-LYF AND LYF>H) 
230 LET MZ=(MZ AND MZ<6)+1 
240 PAUSE 100+ (4E4 AND SC=0) 
250 LET M*(MZ,430 TD 435>="CEH3 
"+CHR* (165+(6 AND 5S=1>+MZ> 
260 PRINT AT 0,0;B*;AT 0,0fM*(M 



__- SCORE: 

"iAT 23,23jSC 

265 IF SS=1 OR MZ=4 THEN PRINT 
AT 13, 0; " "jTAB 30; " " 

270 LET 5=X+50 

280 LET LC=4097+(MZ<3) 

290 GOTO 360 

300 REM MAN HIT/END? > 

301 PRINT AT 1,0; "DEMO ONLY: ER 
ASE LINES 301/302 THEN GOTO 400 

TO PLAY" 

302 GOTO 200 

310 LET LYF=LYF-1 

320 FOR N=4 TO 22 

330 POKE S,22+RND*2 

340 PRINT AT 23 .LYF+1 j CHR* N 

350 NEXT N 

360 RAND USR 16516 

370 PRINT AT 23 , 1 ; "-XXXXXXXXXXX 
XXXXX" ( TO LYF> 

380 IF LYF>0 THEN GOTO 7 

390 PRINT AT 3,29;" ?";AT 2,10; 
" — GAME-OVER — " ; TAB 1;" WOULD YO 
U LIKE ANOTHER ONE ? " 

395 BOTO 370+30»<INKEY*="Y"> 

400 REM NEW GAME > 

410 POKE 16418,0 

420 PRINT AT 0,0;B*;AT 5,1["C0N 
TROL KEYS: Z=LEFT C=RIGHT ";AT 
7,15;" J=UP N=DOWN " ; AT 17,2; 
"III HIT ANY KEY TO PLAY III" 

430 LET SC=0 

440 LET LYF=9 

450 LET MZ=1 

460 LET X=PEEK 16396+ 256*PEEK 
16397 

470 SLOW 



510 CLEAR 

520 SAVE "COMPAH" 
COLIN. HOGG (MO /J. DAVE. ROGERS (B) 

530 PRINT "PRESS NEWLINE THEN W 
AIT 2 MINS",,,"OR ENTER ""S"" FO 
R SECOND SET OF MAZE5" 

540 LET S=0 

550 LET A=0 

560 LET D=0 

570 LET IP=0 

580 LET LC=0 

590 RAND 

600 INPUT U* 

610 LET SS=U*="S" 

620 FAST 

630 DIM M*<6,704) 

640 DIM S*(6,66> 

650 LET B$="^^^^^^H" 

700 REM MAZES-DATA > 

710 LET S*(1>="XXN. . .RTUD.6RXM3 
XG0.6XRU. . .F0E.REUREUREU3. .RUFO. 
. . UFUUE. UEXU. . . XXNC" 

720 LET S*(2>="FTX. . .UNQUNQUK2U 
LQ. 5QNL0NLQ. HQULQULQU42UTU. TUNTU 
. . . FDUFC6FFM. . . FTXH" 

730 LET SS(3J="XXG7XM..6FGU1UUK 
62NNQG1Q5S.K107NIS421TUT. .TEN. -N 
XUG. .MURGURN.06XXMJ" 

740 LET S*(4)="XNX. .FFLFE5.EL06 
42MTP. 12FNEFGEFXEFXE1GETLE. 12UTA 
U.2ULQU4.XLF. .FXNXD" 

750 LET S*(5)="XXX. ..UNA.NBUNEG 
B . NRUS3 . MREMREK82LBQ 1 8ATBA 1 3ATBA 
SS2TF01. .XUX. . .XXXR" 

760 LET S*(6)="XXN. . . UUUUUM. -MU 
UMUUM. . . XUUXUU. . .UUMUUMUUU. . . TEM 
TEM. .UUUMUUM. . .XXNW" 

770 FOR N=l TO 6 

771 LET B*=B*+B* 

772 IF SS=0 THEN GOTO 775 

773 LET U*="NXR7XRG. . "+S*(N,COD 
E "C2V8VF" (N)~2S TO >+S*(6) 

774 LET S*(N)=U*( TO 42 )+ M lU.S 
"+U*(47 TO 57)+"G. .NXRNXR" 

775 NEXT N 

776 LET U*="" 

800 REM QUINBIT-DECODER > 

810 FOR M=l TO 6 

820 FOR X=t TO 66 

830 LET S=CODE S*(M,X)-2B 

840 LET K=136+(M=2)+(41 AND M=4 
)+(RND«20 AND M=6) 
850 LET D=16 
860 FOR N=l TO 5 
870 LET A=27+(K-27 AND S/D>=1) 
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8BB LET U*=CHR* A+U*+CHR* fl 0? 


ai 21 


00 


EB 


09 


EB 


7E 


691 


B90 IF S/D>=1 THEN LET S=S-D 


FE 


40 D2 


7F 


41 


1A 


FE 


40 


1 10B 


900 LET D=D/2 


D2 


77 41 


ED 


4B 


7B 


40 


E5 


1167 


910 NEXT N 


09 


7E El 


FE 


40 


DA 


77 


41 


1126 


920 IF LEN US<30 THEN NEXT X 


DS 


EB 09 


7E 


EB 


Dl 


FE 


40 


1392 


930 LET M*(M,32*X/3-31 TO )= 


DA 


7F 41 


18 


D4 


AF 


32 


7B 


1042 


CHR* K+U*+CHR* K 


40 


11 DF 


FF 


CB 


4E 


20 


03 


924 


940 LET U*="" 
950 NEXT X 
960 NEXT M 


11 


21 00 


01 


00 


00 


2A 


BC 


2B3 


42 


2B 04 


7E 


FE 


40 


30 


0A 


666 


E5 


19 7E 


El 


FE 


40 


30 


Fl 


1264 


970 GOTO 480 


IB 


05 21 


7B 


40 


36 


02 


2ft 


400 


9999 REM THIS LINE IS ESSENTIAL; 


BC 


42 23 


0C 


7E 


FE 


40 


30 


799 




0A 


E5 19 


7E 


El 


FE 


40 


30 


1036 




Fl 


18 04 


21 


7B 


40 


34 


3A 


655 




7B 


40 FE 


03 


20 


02 


37 


C9 


791 


mdurnp. 


FE 


02 CA 


BF 


41 


FE 


01 


CA 


1181 


HEX DUMP CHECK 


B7 


41 78 


B9 


DA 


87 


41 


C3 


1177 


00 00 21 68 42 11 7A 42 409 


8F 


41 41 


00 


00 


00 


00 


00 


333 


01 12 00 ED B0 ED 5B 0C 774 


00 


00 00 


00 


00 


00 


BC 


01 


250 


40 2A 7A 42 19 36 8B 22 549 


BE 


0D 01 


A6 


BD 


01 


0F 


0D 


474 


7A 42 2A 80 42 19 36 8B 646 


00 


BF BE 


01 


10 


0D 


00 


AA 


644 


22 80 42 2A Q6 42 19 36 554 


24 


24 24 


24 


25 


25 


25 


23 


356 


8B 22 B6 42 C9 2A 0C 40 698 


















01 18 03 3E IB ED Bl 01 539 


















C8 00 C0 3E 03 32 21 40 612 


BASIC hen loudw progra 


m. 












21 7fl 42 11 BC 42 01 06 460 


















00 C5 E5 D5 ED B0 CD 12 1285 


1 


REM 














41 El Dl CI ED B0 EB 3A 1409 


2 


REM THESE FOUR 


LINES 


EACH 


21 40 3D 32 21 40 20 E3 576 




CONTAIN 


101 CHARACTERS 


16 03 21 7F 42 01 06 00 271 


3 


REM PLEASE 


READ TEXT 


BEFORE 


7E FE 3D 30 08 09 15 20 573 




ENTERING. 








F7 01 05 00 C9 36 00 3A 581 


4 


REM 














7F 42 2A 7A 42 77 3A B5 749 


B997 


REM **** 












42 2A 80 42 77 3A SB 42 701 


899B 


REM 


SELF 


CHECKING 


HEX 


2A B6 42 77 01 2C 01 C9 626 
21 90 42 7E E6 01 77 3A 796 


8999 








LC 


flDE 


R 












32 40 ED 4B BE 42 8B 2B 87B 


9000 


POKE 


16510 











06 38 0B CB D6 IB 06 CB 741 


9010 


POKE 


1651 1 


19 








DE 18 02 CB CE 3A 33 40 B52 


9020 


POKE 


16512 


2 








B9 28 06 38 08 CB EE 18 7B3 


9030 


FOR L=l 


TO 


63 








06 CB F6 18 02 CB E6 CB 1141 


9040 


PRINT AT 17,4 


"OK 


ENTER L 


76 28 02 CB B6 CB 46 20 B27 


INE 


';L 














0F CD 67 41 D0 21 90 42 865 


9050 


LET X=16514+8*(L 


1 > 




CB 5E 20 04 CD FF 41 DO 1093 


9060 


GOTO 


9080 










21 90 42 CB C6 CD 71 41 1055 


9070 


PRINT AT 17,4 


"aaaaa.REDO" 


D0 CD BA 41 C9 CB 5E 20 1223 


9080 


INPUT U* 










06 CB 56 20 10 IB 06 CB 606 


9090 


IF LEN U*<17 THEN GOTO 9070 


66 28 1A IB 10 01 DF FF 718 


















11 00 FF IB 16 01 21 00 384 


910E 


LET C=0 












11 00 01 IB 0E 01 FF FF 600 


9112 


FOR N=0 


TD 


IS 


STEP 2 


11 FF FF IB 06 01 01 00 593 


912E 


IF U*(N 


► 11 


>"F 


1 THEN 


GOTD 90 


11 01 00 2A 8C 42 3A 91 504 


70 
















42 77 09 7E FE 40 30 11 739 


913C 


POKE 


X+ 


1/2 


, 16 


*CODE U*<N+1>+ 


32 91 42 22 BC 42 36 SB 731 


CODE 


U*(N 


+2) 


-476 








2A BE 42 19 22 8E 42 AF 730 


914B 


LET 


Z=C+PEEK 


(X+N/2) 


C9 2A BC 42 36 8B 37 C9 937 


9150 NEXT 


N 












3A 90 42 21 01 00 CB 6F 656 


9166 


IF C+LOVAL U*<17 TD ) THEN 


20 03 21 FF FF 22 7B 40 840 


SOTO 9070 












2A 8C 42 E5 Dl 01 DF FF 1207 


9170 NEXT 


L 




























106 
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LIBRARY OF ADVANCED MATH/STAT/ECON 
FOR SINCLAIR ZX81 AND SPECTRUM 

TAPE 1 I MATRIX OPERATIONS l*(, (*) EB.B5 



■5KZXB1 /-,■:■■,. :i-K Sncr.lM- 
SdeB DeTemvnantsol square I 
TAPE 2: POLYNOMIALS M 



^INTEGRATION (i| 



TAPE 4: SUPER-REGRESSION (■ 



i I PROFESSIONAL LINEAR PROGRAMMING [•) 



5. 50*25. SIDE BiSolurio 



TAPE 8; STATISTICS (■ 



iK Spec! rum : ZOO. 48 K Soeclrum : 



_ EDUCATIONAL SE 



INTRODUCTION TO ECONOMICS SET (aBK Soeclrgm only) 
MICROECONOMICS I (+1 

MICROECONOMICS II l+| 

MACROECONOMICS < I ) 



returns SIDE B: Mortals, c 






lY MEROE'READ D 



PLEASE SEND AS SIZE S.A.E. FOR INFORMATION ON MICRODRIVE- 



SPECTRUM -ZX 81 






Make the most of your micro with 

these acclaimed books from 

the experts! 

a Mastering Machine Code on Your ZX 
SPECTRUM 




ZX SPECTRUM 



QCrei 



□ Instant SPECTRUM Programming 

Tim Harwell 126 pages, C60casseHe 
,!OSin:i..i,Kl f ,:riiK Precis lot I he 
SPECTRUM. ZX81 and Other Comput. 

!■>■;. Ir:. A.inrriM '.:■! f.n.J.-L. 

□ Putting your SPECTRUM lo Work 

SPECTRUM M.x.-hmu Code made Easy 
Vol One (loi beginners) 
amesWalsh. 222 pages 

□ SPECTRUM Machine Code made Easy 

n Mastering Machine Code on your ZX81 
Tom Baker. 1 88 pages 

□ Getting Acquainted with your ZX81 



isforthelKZXSl 
BsforlheZXSl 



£7 95 
£6.95 

£4.95 
£3 95 
£4 95 

£6.45 
£4.95 



£7 50 
£5.95 
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I16K SPECTRUM CAME I 



Log Hop 

would be Lumberjack Christopher Cibbs 

sent us this challenging program from 

Reading Forest. 



re game involves jumping 
gs and up through gaps to 
he rings at the top of the 



enough to reach a goi 
Christopher says his 
score so far is 93%, I 
not getting any score 



Program structure 




Main loop 
Fall down hole 

fame update 

'Reached the r 
Presentation ai 
Graphics 
Random set u[ 



1 REM *********************** 
♦Underlined characters* 

♦GRAPHICS mode. * 

2 POKE 23658, B 

3 PAPER 01 INK 7: BORDER 0: C 



5 LET 



LET gai 



GO SUB 8000 

2 LET SCORE=10J30: LET dead=0 

3 LET gsne^I 
5 LET x-19: LET y-10 

20 LET e*-"R" 

30 FOR m-3! TO 1 STEP -1 

31 IF SC0RE>1 THEN LET SCDRE= 
CORE-2 

32 IF dead>0 THEN LET dead-de 
BEEP 0.05,-10 

PRINT ^NK 6|AT 5, 0i a* 1 32-tn 
iatl T0 32-m);AT 10, 0; INK 
m TO >ib*< TO mllflT 15, 0i I 
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43 IF d»ad>0 THEN GO TO 35 
43 IF m/2-INT Im/Z) THEN LET 

«*=*B" 

46 IF m/3-INT (m/3) THEN LET 



50 PRII 



INK 6; AT i 



y , - • | m 



53 IF ro/3-INT (m/3> THEN GO T 

37 

33 IF SCREEN* ( x + 1 , y* 1 > - " " TH 

EN CO SUB 200 

37 IF d*»d>0 THEN GO TO 100 
A0 LET yy* 1INKEY*«"B" >-(INKEY 

*>-5'l 

85 IF y<0 THEN LET y=29: PRIN 
T AT x,0f ■ 

86 IF y>29 THEN LET yB\ PRIN 
T AT x,29| " 

90 IF INKEY*= n 0" THEN 00 SUB 
1000 

95 LET *»=' , 6" 

100 INK 7: NEXT Hi 00 TO 30 

200 REM FALL 

205 INK 6 

210 IF x=19 THEN SO TO 300 

220 FOR n-x*l TO x+5: PRINT AT 
n.y+ll "H-JAT n-l,y+lt" "I BEEP 
.05,20-nI NEXT n 

230 LET eS="£": LET x=n-l: PRIN 
T AT x,y+lJo*: LET desd=D+2: 

240 IF SCREEN* (x+l,y+l)- n " TH 
EN GO TO 210 

250 RETURN 

290 REM DEATH 

300 PRINT AT 19, y + ll "H." : PAUSE 
2: PRINT AT 20,y+ll -H n ( AT 19,y+l 

1 " ' 

305 BEEP 0.1,0 

310 PRINT AT 20, y+1) " ■ 
'320 FOR n-y*l TO 30: PRINT INK 

5IAT 21,nl*C'1 INK 6|' , E": BEEP 
0.05, 30-n: NEXT n! PRINT INK 51 

BRIGHT 1|AT 21,31) "E" 

321 FOR n-1 TO 10: NEXT r. : LET 
3CORE=0: GO TO 330 

323 LET SCORE-INT < 100* (SCORE/ 1 
000) ) 

330 PRINT AT 2, 10| " "| 

AT 3, 101 " -(AT 4, 10| ■ 

"IAT 3, 10| "SCORE-" | SCORE 
I "X" 

340 PRINT AT 17,31 FLASH I|-PRE 
SS ENTER TO CONTINUE": IF CODE I 
NKEY»013 THEN GO TO 340 

345 CLS 

350 FOR n-1 TO 10: IF SCOREMin 



) THEN GO TO 400 

360 NEXT n 

370 PRINT AT 0,3[ 'TODAYS GREATE 
ST;: FOR n-1 TO 9: PRINT AT n*Z, 
6)n| "--I " n It*ln)i ' ... "Ulnl: 
NEXT n: PRINT AT 20,91 101 "• "it* 
(1031 ■ ... 'I z (10) 

380 GO TO 9313 

400 FOR m-10 TO n+1 STEP -11 LE 
T Km)-z(m-l): LET * * Im) -t* (m- 1 ) 
: NEXT m: LET x In) -SCORE 

410 INPUT "ENTER YOUR INITIALS 
(MAX 3) "!9«r IF LEN g*>3 THEN 
GO TO 410! 

420 LET f«*n)-g«: GO TO 370 



j THEN GO 
1100 
IF SCREEN* (x-4,y*l )-"©" TH 

LET d*Od-D*2: GO TO 1030 
PRINT AT x.y!" £ " : BEEP 0. 
B: FOR-n-x-1 TO x-5 STEP -l: 



■1 BEEP 0.0 


3,20 


-n: 


NE 


XT n 




1023 


LET x- 












1030 


RETURf 












1050 


PRINT 


AT x 


,y* 




£': P 


USE 2 


; FOR n-x-1 


TO 


x-3 


STEP -1 


PRIM 


T AT 


n,/ + H 


'£" p 


AT nt 


, > ■ + 1 1 


■' : B 


FEF 


05,20- 


1! NEXT 


n 






1033 


PRINT 


INK 


7IAT 


n*l , > 


ll-E" 


1060 


BEEP B 


.1,1 











L070 


FOR k- 


i+2 


TO 




PRINT 


AT li, 


y*i\ 


H» i AT 


h-1, 


y*i 




■: BEEP 0.0 


5,20 


k: NEXT k 










1072 


PRINT 


INK 


61AT 


K-l, Y 


i s "£" 


1075 


LET e* 


-" B " 










1060 


RETURN 












1100 


REM FI 


NISH 










1 1 JO 


PRINT 


AT K 


f y+ 


1 


£": PAUSE 2 


: FOR n-x-1 


TD 


X-X 


STEP -1 


PRIN 


T AT 


n , > ' ♦ 1 1 


■B"|AT n+ 


,y*ll 


■ ■ B 


EEP 0.05,20 


-n: 


NEXT n 




1115 


PRINT 


at e 


,P0 


■J- [AT 


,P0| " 


J"! FOR N-1 


TO 


10: 


BEEP 0. 


,n: n 


EXT 


: FOR 


N-20 




0" 


STEP 


2: BE 


EP 


i,n: n 


EXT 


N 








1 120 


GO TO 


323 










60 10 


LET m* 


-"© 


©o© 


©4>© 


© © 


©©© ©©©" 












8012 


LET n* 


,-G 


© 


• 


C 


© © 


© © © ©" 












B014 


LET o* 


-■© 


© 





© © ©© ©©© 


© © ©©©" 












B016 


LET p* 


-■e 


© 





e © 


© © 


© © © 












6017 


LET q* 


-"©©© ©©© 


?>9~> 


© © 
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8020 FOR ro-27 TO 2 STEP -1 

8025 BEEP 0.01,171 

8030 PRINT INK 1 I AT 4,mlm*I TO 

28-n>) I INK 2IAT 5,m|nC( TO ZS-m) 

> INK 3IAT £,mlo«< TO 2B-m> ( INK 

4|AT 7,m|p»f TO 26-m) I INK 5IAT 

B,mi q*f TO 28-m) 
B040 PAUSE 2: NEXT m 
9045 FOR j-1 TO 3 

8050 FOR n-1 TO 6: INK n! PRINT 
AT 4,2|mC|AT S,2|n*|AT 6,2lo«[AT 

7,2ip*l AT 8,21 q* 
8055 BEEP 0.01 , n + 10+ tj*2) : NEXT 

B056 NEXT j 

B060 PRINT_AT 12,61 INK 7| BRIGH 
T 1 1 "BY CM. GIBBS 1983" 
B070 PAUSE 100 
8080 CLS 
8090 REM RULES 

8100 PRINT AT 2,21 INK 7; BRIGHT 
li'5! LEF**»AT 4,2I"B: RIGHT";A 
T 7,2("0: JUMP"iAT 12, 0i "DODGE T 
HE GAPS, REACH THE RINGS "I'M* 

AND DON'T GET KNOCKED OUT ! " 
8110 PRINT FLASH 1 ( AT 21,3; "WAI 
T ONE MOMENT PLEASE" 
9000 REM GRAPHICS 

9010 FOR n-0 TO 7! READ •! POKE 
USR "a"+n,a: NEXT n 

9020 DATA 28, 28, B, 63, 40, 14,82, 35 
9030 FOR n=0 TO 7: READ a: POKE 



9040 DATA 28,: 



EXT n 

B,9, 254,24,232, 136 



9050 FOR n-0 TO 7: READ a: POKE 

USR "c"*n,a: NEXT n 

9060 DATA 68,186,185,82,60,199,6 

d, 36 

9070 FOR n=0 TO 7'. READ a: POKE 

USR "d"*n,a: NEXT n 

9080 DATA 28,28,8,62,85, B5.20, 11 

9090 FOR n-0 TO 7! READ a! POKE 
USR 'e"fn,a: NEXT n 

00 DATA 0,6,2,18,18,210,222,25 

10 FOR n-0 TO 7: READ a: POKE 
R T*n,a: NEXT H 
15 DATA 0,0,0,12,24,40,196,3 
9120 FOR n-0 TO 7: READ a: POKE 
USR "g"+n,a: NEXT n 

9130 DATA 66,66,66,66,231,165,23 
1 ,0 

FOR n-0 -TO 7: READ a; POKE 
■SR "H"*n,«: NEXT n 
150 DATA 195,36,24,146,254,16,5 
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9160 FOR n=0 TO 7: READ a: POKE 

USR "I**n,a! NEXT n 

9170 DATA 66,66,66,66,231,231,23 

1 , 130 

9IB0 FOR n-0 TO 7: READ a! POKE 

USR "J"+n,«: NEXT n 

9190 DATA 1B6, 186,254, 16,56,68, 6 

S, 19B 

9200 FOR n-0_ TO 7: READ a: POKE 

USR ■K**n,aV NEXT n 

9210 DATA 28,28,255, B, 15, 241,0,0 

9500 REM STRINGS 

9510 DIM a*(31): DIM b*C31): DIM 

c*(31> : SIM d*(31 ) 
9515 IF gatne="l THEN LET b-l + INT 

(RNE#3> : GO TO 9520 
9517 FOR b»l TO 3 
9520 FOR n-1 TO 31 
9530 LET r=INT (RND*6) 
9540 IF r=2 THEN LET HOLE-1 l GO 

TO 9548 

9545 IF b-1 THEN LET a«fn)=' 
GO TO 9551 

9546 IF b-2 THEN' LET b«(n)- 
GO TO 9551 

9547 IF b-3 THEN LET t«tn)- 



00 ' 



=> r : 5 ] 



9548 IF b-1 THEN LET a*(n)=" " 

9549 IF b=2 THEN LET b«(n)-" " 

9550 IF b=3 THEN LET c*(n)«" " 

9551 NEXT n 

9552 IF HOLE-0 THEN LET A*(l)*" 
": LET 8*<1>-" ■: LET C» ( 1 ) - " ■ 

9553 LET HOLE-0 

9555 IF 9 ame-l THEN CLS : GO TO 



9570 PRINT AT 21,31 FLASH 0i " 

PRESS ANY KEY ": PAUSE 
9575 CLS 

9600 LET Z*="F": FOR M=31 TO 1 S 
TEP -1 

9610 PRINT INK 6iAT 5,Nla*( TO 
32-MMAT 10, 0| INK 3;b*!rn TO ))A 
T 15, Mi INK 4|c*( TO 32-1*1)1 INK 
7iAT 20,0i<i*(ni TO ) 

9615 PRINT INK 5IAT 21,0iZ* 

9616 LET Z«=Z»t"E" 
9620 NEXT M 

9625 PRINT AT 19,11| P E" 

9630 LET po=2+INT ( RND*27 ) : PRIN 

T AT 0,pot INK 6j BRIGHT ICE" 

9640 INPUT "ENTER DIFFICULTY (1 

/2/3> "ID 

9645 IF dOINT d OR d<l OR d>3 T 

HEN GO TO 9640 

9650 GO TO 12 




Exploring the Sinclair QL — 
An Introduction to SuperBASIC 
Andrew Nelson, £4.95 

The QL has a rich, new programming vocabulary, 
and this greal book gives you the chance to master 
ihehostof new words Sinclair has added. Sure. 
you can use the QL more or less just like a 
Spectrum, but if you do. you are missing the 
extraordinary power which lies behind the radical 
concepts of SuperBASIC Command by command, 
statement by statement, Andrew Nelson takes you 
ihrriuqri the richness of QL SuperBASIC in 
Exploring trie Sinclair QL — An introduction to 
SjperBfl.SIC Just £4 95 and available from most 
bock and computer shops. In case of difficulty, you 
can older it directly from Interface Publications, 
using the coupon below. (Trade only: Interface 
Publications are distributed exclusively in the UK 
and Eire by W H S Distributors. Export 
orders handled by Interface Publications.) 



ISBN 907563 60 

□ Creating Adventures on your ZX Spectrum - 
R'tt'i Shaw i. jjivics Mo:Tl!--m.3ti. ISBN 907563 58 9 
Practical Uses for the Miciocompu:er in the 
Home - David Hole. ISBN 907563 69 7 

M Mastering Machine Code on you J Commodore 64 
i .! .i II III i F3694 

□ Making the Most of your TI 99/4A — Scon Vincent. 
ISBN 907563 66 X 

■ Dynamic Games for your Electron — 
Neal Cavalier-Smith. ISBN 907563 67 S 

I The 3-D Animated Apple — Phil Cohen. 
ISBN 907563 79 3 

□ The Art of Structured Programming — Peter luliff 
ISBN';907563791 

H Dynamic Games for your TRS-80 — Gail DunsS 
' TimHwindl E3BNQ 90756383 S 

Name 
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■ We're the 



SPECTRUM MUSIC 



Budding Beethovens begin here with Lancastrian 
J w casson's 16K computer composer program. 




Minstrel 



I SPECTRUM MUSIC 



Program notes 



300-370 


















1000-1230 






1500-1509 




1510-1541 






2010-2500 










3000-3099 


Coordinates lot draw 


ng rests, notes, bar li 


4000-4060 


Dtaw Rest, scroll left 






Coordinates listing of tune 




Draw note/rest sub.o 


UtfeM 


Variables 






Tim 


No. of whole notes in 


a bar 




No. of whole notes c 
















H2,ioo) 


Pitch of note - both 


















Data to convert numl 






Control characters - 


Sharps, flats and bar! 



Rest binarv vari 
■ Sharp binarv varial 
- Flat binary variable 

Cursor variable 
Converts INKEYS 



1 REM 

2 LET sc=PEEK 23635*256*PEEK 
23636*3 

9900 FOR n = TO 30 

9910 READ byte: POKE sc+n.byts: 

NEXT n 

9920 DATA 1,0,8,17,0,72,33,1,72, 

237, 176, 6, 64, 62,0, J 7, 32,0,33,31, 

72, 119,237,90, 16,251 ,201 



2>p0ke 23638,6:: ink 0: paper 7 
:bright 0:cls :dim S«U00>:let s 

-0JLET F-0 

3 POKE 23676,255 
13 DEF FN I <C,L,H)=C* (INKEYS=" 
6 " I * ( C < H > - < I NKEY«« " 7 ■ > * < C >L ) 
23 DEF FN P<X)>30+2*X 
30 LET SC-PEEK 23635*256*PEEK 
23636*5 
100 DIM N(19) 
110 DIM T(4,100>: LET L=l 

130 GO SUB 1500 

131 LET R-0 

132 LET BA=0 



LET C = 



133 DEF FN B(T)=2/2-T 
135 RESTORE 

!40 FOR N-I TO 19: READ C 
150 LET NIN) =C 
160 NEXT N 

170 DATA -5,-3,-1,0,2,4,5,7,9,1 
19,21,23,24,26 
LET OC=C: LET 0PC= 
l: LET PC=OPC 
190 GO SUB 1000 
301 LET R=0: LET E-L 
310 PRINT «0iAT 1,0; ■ 1 Semibr 



320 PRINT B0;AT C,0}">": OYER 

321 BRIGHT 1! PRINT AT 3,0i FLA 
SH FI-FLAT "I FLASH NOT R|" NOTE 

ASH 3i" SHARP ■■ ; FLASH RJ ■ 
"i FLASH 0I":NOTE " i L : BRI 

.ET F=(NOT R) AND (<INKEY»= 

ID S>0) OR (IF AND INKEY*< > 

! LET S=»N0T R AND (l<INKE 

AND F=0) OR (S AND INKEYS 

330 IF INKEY*=CHR* 13 AND BA*FN 
=TIM THEN LET TI1,L>=C: B 

EEP .1,-30: LET BA=BA+FN B(C): L 
ET SflD-CHRi ( 1128*(BA-TIM) > ) ! 
LET BA=BA*<BA<TIM) : GO TO 400+36 

00 *R 

331 IF INJKEY«""K" THEN INPUT " 
LIST "|NL; LET L=NL! LET E-100: 
GO SUB 0500: GO TO 300 

332 IF INKEY*=CHR* 12 THEN LET 
L-L-l: LET BA=BA-FN B!(T(1,L))- 

10*IT<1,L) >10) >: LET BA^BA*TIM*f 
BA<0): BEEP .1,-30: LET T ( 1 , L ) =0 

1 LET SS(L)""-: GO TO 300 

333 IF INKEY«-"P- THEN GO SUB 
2000! GO TO 300 

334 LET R={ (INKEY«=-R") AND IR- 
0)) OR <R=1> AND (INKEY»< >"N") 

340 LET C-FN KC,1,3): IF OC< > 
C THEN BEEF .03,-30: PRINT »0|A 
T OC,0! OVER U->-: LET OC=C 

370 GO TO 320 

401 OVER 1 

402 LET S«(L1-CHR* (CODE S*(L)+ 
50#S*51*F) 

410 PLOT 250,8B-PC*2: DRAW -2,2 
: DRAW 2,2 

420 LET PC»FN I(PC,1,19) 

425 IF INKEY*»CHR» 13 THEN GO 
TO 470 

430 IF OPCOPC THEN BEEP .05,- 

ZX COMPUTING OCTOBER ■NOVEMBER 11 



SPECTRUM 



30: OVER l: PLOT 230,89-OPC*2: D 
RAW -2,2: DRAW 2,2: LET OPC-PC: 
GO TO 410 

433 IF INKEY*«"D" THEN PLOT 25 
0,8S-2*PC: LET BA=BA-FN BITtl.L) 
): LET BA=BA + TIM*fBA<0)": DRAW -2 
,2: DRAW 2,2! GO TO 300 

460 GO TO 420 

470 PLOT 250,SS-PC*2: DRAW -2,2 
: DRAW 2,2: LET T(2,L)=20-PC 

480 OVER 0: GO SUB 1510: REM DR 
AU STAVE 

490 RANDOMIZE USR SC 

300 LET LI=L: GO SUB 3000 

550 LET L=L*1: GO TO 300 
1010 INPUT "SHARPS 7"J LINE I« 
1020 IF I*--" THEN GO TO 1100 
1030 LET S=(CODE IS1-63 
1045 IF I«-"G" THEN LET N I 1 ) =N ( 
11 + 1 

1060 FOR M=l TO 19 

1070 IF (M-S) OR (M=S+7) OR (M=S 
U4I THEN LET N(M) «=N <M) + 1 
1075 NEXT M 
1090 GO TO 1010 
1100 REM INPUT FLATS 
1110 INPUT 'FLATS ?" i LINE IS 
1115 IF I*-"" THEN GO TO 1200 
1130 LET S-ICODE I*>-63 
1150 IF I*=-G" THEN LET N < 1 > =N ( 



2024 IF T(1,N)»0 THEN 


LET l=n: 


GO TO 2300 




2025 IF TI1,N>>!0 THEN 


LET T(3, 


Nl -100/2" ( IT(1,N)-10> ) : 


GO TO 20 


2030 LET T 13, NJ «T*2/ (2" 


( T U , N ) ) 1 


+ T / 20» ( < S* ( N - < N > 1 ) 1 < C HR 


* 1281 ) 


2040 LET T 14, N) =N(T<2,N 


) ) + !S*(N) 


. ■ 2 ■■ OP S* (N)«"SIN " > - ( 


SS(N)="3" 


OR S*(N1 -"CO? " ) 




2050 NEXT N 




2499 ppi^t H0t"TUNE COMPILED PRE 


S? ANY KEY" : PAUSE 




2500 FOR N=l TO L 




2510 IF TII.NKIO THEN 


BEEP T(3 


,N) , T (4,N1 : NEXT N 




2511 PAUSE CTI3,N>+1) 




2321? MFvt N 




2530 RETURN 




3001 LET S=0: LET F=0 




3010 GO SUB 1310 




3315 LET R-0: IF TI1.L) 


>10 THEN 


LET R=l : LET T t 1 ,L) =T 


I, LI -10 


3017 IF 5*(L>""2" OR S» 


!L>="SIN 


" THEN PRINT AT 15- (T 


2,L> /41 ,2 


SI "tt" : LET S=l 




3016 IF S«(L)-"3" OR S« 


(L>="COS 


■ THEN PRINT AT 15- (T 


2,L) /4) ,2 



1160 FOR M=l TO 19 

1170 IF (M=S) OR (M«S+7> OR (M=S 

+14) THEN LET N(M>=N(M1-1 

1190 NEXT M 

1190 GO TO 1100 

1210 INPUT "Time as a -fraction " 

I tin 

1220 LET 3-0 

1230 RETURN 

1300 REM 1ST STAVE 

1501 GO SUB 1510! DVER O: DRAW - 
S,0: DRAW 0,-16 

1502 RANDOMIZE USR SC : GO SUB 15 
10 

1503 PLOT 239,59! DRAW 4,0, PI! D 
RAW 0,27: DRAW 2, 4, PI/12: DRAW 2 
,-4, -PI/10: DRAW -4,-7: DRAW 0, - 
IS, PI/1. 2! DRAW 1,12, PI! FOR R-0 

TO 2: GO SUB 1510! RANDOMIZE US 
R SC: NEXT R 
1309 GO SUB 1510: RETURN 
1510 FOR N-0 TO 4 
1520 PLOT 239,62+4*N 
1530 DRAW 0,0 
1540 NEXT N 
1341 RETURN 

2010 INPUT "TIME FOR MINIM "ST 
2020 FOR N=l TO L-l 



3039 IF R THEN GO TO 3) 

3040 IF T(2 
,82: DRAW e 
3050 IF T(2 
,36: DRAW 8 



3060 IF T(2, 

58: DRAW 8,0 

3070 IF T(2,l 

54: DRAW 9,0 

3080 RANDOMIZE USR 5C 

3090 FOR J=5 

(L+l ) ="SIN 
«(L+l)="COS ■ 

: GO SUB 1510 



15 THEN PLOT 235 

17 THEN PLOT 233 

3 THEN PLOT 233, 

3 THEN PLOT 235, 



(S*(L+1 )='3- OR S« 

OR S»(L*l)-*2- OR S 

TO Tll.L) STEP -1 

RANDOMIZE USR SC : 



NEXT 3 

3091 IF CODE S*(L)>=129 THEN PL 
OT 240,62: DRAW 0,16: GO SUB 151 
0; RANDOMIZE USR SC 

3092 IF R THEN LET T(l,L>»Tfl,L 
1 +10: LET R-0 

3099 RETURN 

403B LET T( 1 ,LJ-T (l,L) +10 

4039 GO SUB 3000 

4040 LET L-L*l 
4060 GO TO 300 

B021: IF T<2,L)>18 THEN PLOT 23 
3,90: DRAW B,0 



SPECTRUM MUSIC I 



-l: DRAW -5,0: RET 



B#! REM TREBLE CLEF 


9310 LET Y-FN PIT(2,D) 




8520 FOR X^0 TO 10 


9320 FOR D=0 TO 2 STEP .5 




8535 LET L'X*NL 


9330 CIRCLE 239, Y,D 




B537 IF TU,L)=0 OR L>E THEN RE 


9340 NEXT D 




TURN 


9349 PLOT 241, Y: DRAW 0,11 


RETU 


9540 GO SUB 3000 


PN 




8576 NEXT X 


9360 PLOT 245,66: DRAW 0,4 


DRAW 


8580 IF LCE THEN LET NL=NL+X: P 


2,0: DRAW -1,3: RETURN : 




RINT AT 0,0; "Scrol ]?": PAUSE 0: 


9400 REM QUAVER 




PRINT AT 0,0J( OVER 0i " 


9410 LET V=FN P<T(2,LM 




■: GO TO B320 


9420 FOR D=0 TO 2 STEP .5 




8590 PRINT BA: PAUSE 0: RETURN 


9430 CIRCLE 239, Y,D 




9101 OVER 


9440 NEXT D 




9105 LET Y-FN PfT(2,L> ) 


9449 PLOT 241, Y: DRAW 0,11 


DR.ii; 


91 10 CIRCLE 239, Y, 2 


3,-2: DRAW -3,1: RETURN 




9140 RETURN 


9460 PLOT 245,70: DRAM 4,1 


DRAW 


9160 PLOT 245,70: DRAW 0,-2: DRA 


-2,-6: RETURN : 




U 5,0: DRAM 0,1! DRAW -5,0: RETU 


9510 GO SUB 9400 




RN : 


9520 DRAW 0,-3: DRAW 4,-1: 


DRAW 


9210 GO SUB 9100 


"4, 1 




9220 PLOT 241, Y 


9530 RETURN 




9230 DRAW 0, 11 


9360 PLOT 245,70: DRAW 4,1 


DRAW 


9240 RETURN 


0,-2: DRAW 3,1: DRAW -3,1 


DRAW 


9?60 PLOT 245,71: DRAW 0,1: DRAW 


-2,-6; RETURN 











SINCLAIR CLINIC 

COMPLETE REPAIR SERVICE 

For advice and help ring or visil us at our Microcomputer centre Contact: JOHN WOOD 



- HARDWARE 
r SOFTWARE 
r UPGRADES 
r KEYBOARDS 
r MICRODRIVES 
r BLANK TAPE 



Spectrum 48K 

Prop, the largest selec. in Lanes. 

Memory issue 2 and 3 

DKtronics fitted trom £35.00 

+ Interface II 

CIO - C1 5 - C20 



• MONITORS 
■ BOOKS 
. JOYSTICKS 
. MODEMS 
< PRINTERS 

I RD 



Microvitec to Speclrum 
1 00 Titles 

Kempston - Sureshol 
Prism VTX5000 
Alphacom 
Digital Tracer 



JUST A PHONE CALL AWAY 

For sales, service and repairs. All postal charges at cost. 



P. V. TUBES 

Dept ZX, 104 Abbey Street, 
Accrington, Lanes BB5 1EE. 
Telex: 635562 Griffin for PV 



Q 2g 



Telephone: 
(0254) 36521 
(0254) 32611 



ACORN — BBC — SANYO — COMMODORE — Authorised Dealers 



USA NEWS 



Across the Pond 



Mark Fendrick is a respected American 
TS fanatic who will be keeping us informed of the 
^^- ^^- latest USA developments. 



(No longer 
ll-OUt.) You 



inadequate 
Promotion 



The original Sinclair 



r. For $99.95, you could 

a fully assembled com- 

■! If you ware the do-it- 

rffljrself type, you could get the 

A for S 7 9.9 5. Playing on the 

")ninJulyof1982.From 

In thefall, Sinclair announced 
:, who had been 
ng the ZX-81, had 



» the same S 9 9 .9 5 list p 

(would contain 2 K RAM. 

All Sinclair compatible ; 



■encei, so T 
id Alphacom K 



face, as well as 48 K RAM. (The 
16K RAM i/ersion had been 
scrapped]. The suggested retail 
pries for this was$199.95. 

Other 
improvements 

Also at the same time. Timex 
was updating the T/S 1 000 into 
what became the T/S 1500. 
The 2 K RAM was replaced with 



nT/S 1016 16K 



for Timex to coi 
T/SaOOO.Itwa 
looking identic; 
familiar Spectru 
ed, however, ti 



i replaced by the 

keyboard now found on the 

Spectrum. All this for S79 .95. 

After lengthy delays. Oc- 



City, I had tc 

Computer S 

Maggy Bru; 
USA, and D; 
dent of Tim 



T/S 2068/ 
Spectrum 
Compatibility 

Much of the Spectrum software 
may be compatible with the T/S 
2068, but there are a few pro- 
blems. Due to the reorganization 
of the ROM. machine code soft- 

the T/S 2068'. All basic pro- 
grams written for the Spectrum 
will work on the T/S 2068. but 
there are occasional problems 
LOAOing them from Spectrum 
tapes. ZX-81 software is, 
however, compatible with both 
the T/S 1000, and T/S 1500. I 
will be investigating software. 



compatible, i 
foothold inn 



schedu 
<16K). 



d to be the T/S 20 
nd T/S 2048 (48: 
i been updated, a 






(Command Car- 
be developed. The 
type of keyboard 
found on the Spectrum was 
replaced by the soft-touch, full- 
size keyboard similar to that of 



the U.S. computer 
announcing its exit 



is fur 






ur display 

to BEEPI 
: the four 






port you in 



b QLh 



is opposed to the sir 

sed on the ZX prim 
le T/S 2040 is nu 

X CCMi'UTING OCTOBER TJO VFM9EH 198< 



iproved LOADing s 
added. Now the 
id T/S 2068 had , 
(differing somewha 



in the months followini 
nounced by Timex, ha' 



lupptei 



ogeta 



U.S. If v 



>y of your 
catalogue, indicating which pro- 
grams are in BASIC, (along with 

from North America I, ] will com- 
pile a list of products, (if you 



copy, 1 1 






' a iiable . compatible. 



negated those agreements, and 
is importing no software. Please 
reconsider your position, and 
allow North American Sinclair 



the peripherals that 
forward to were not 
i marketed — 



Ray Elder for thinking of us. I 
youf rom both sides of the Allan- 




DUCKWORTH 
HOME COMPUTING 

THE ADVENTURER'S COMPANION 

vive the pale bulbous syw? How do J gel past Uie tp 

Tr-.est? How do J escape the Cnhlinfi Dungeon? 

i guide to plaving Ion 



took up the answer wiihour owing w 



THE ADVENTURER'S NOTEBOOK 
Mike Gerard 
or both beginruHB and regular adventure players. D explains 

I games more successfully and a list of recommended adveti- 



AVALON SOFTWARE LTD 

present, for 48K Spectrum 



L-. 



-J 



Available by direcl mail from 



■SOFTWARE REVIEWS! 



Readers' Reviews 

opinions from the people who play 
and use the programs the most 
- yourselves. 
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■ SOFTWARE REVIEWS 




been produced by two very dif- 
ferent software houses: Psion 

former has many good quality 

latter has only appeared on the 
Spectrum scene recently. 

Seen on the shelf Psion's 
Flight Simulator has a con- 



rable 






C.m;.J 



ting .The next aspect of the pro- 
ducts which is always taken into 

they are both a reasonable 
£7.95 which should not deter 
the would-be flying ace. 

thoroughandpreciseforthetwo 
packages although Fighter 
Pilot's is slightly superior in that 

technical data as well as the 
usual instructions. The notes 
give advice on your approach. 
Haps and undercarriage and in- 
forms you of your take -oft and 
stall speed . The aircraft ' s perfor- 
mance and specifications are 
dealt with in the Technical Data. 

Flight Simulation does not 
have provision for a joystick 
although it is possible to use the 
Kempston device with the aid of 
a conversion tape. On the other 
hand. Fighter Pilot can incor- 
porate one of three: Kempston, 
AGF and Sinclair Interface 2 las 
well as the keyboardl. 

Both programs load in just 
under four minutes and result in 
a list of options. In Flight Simula- 
■ -flight final 



Landing System IILSI whii 



Both maps are wraparound af- 
fairs which can be very confus- 
ing when crossing from one side 
to another. The Flight Simula- 
tion map covers 12,288 sg. 



undoubtedly are, yoo 
enter the sinister driveway onty 
to discover that the gates have 
shut behind you and that you are 
imprisoned in a labyrinth of h 
tying alleys infested I 
hedgehogs, kangaroos and I 
tying birds (all trained in let 



approach and take off. Having 


The Flight Simulation instru- 


and three lakes: Orb, Long and 


undesirable fauna there art 




made your choice, you are asked 


ment panel is somewhat similar 


Tri. The Fighter Pilot map covers 


other dangars in store, such at 








20,000 sg miles, has two 


spectacular jumps lover Buso 




fects or not (the novice should 




ranges of hills (3,500 & 2,000 






decline as it makes the game 




ft highl, eight beacons and four 






considerably harder). Fighter 




runways: Delta, Base, Zulu and 








left to right: an ILS below which 


Tango. Unfortunately, when 






menu containing five options: 




one displays the map in Flight 


dead-ends. There are only a fe* 




landing practice, flying training, 


displays your altitude digitally 










when it is less than 1 ,000 ft. 








to-air combat and blind landing. 


Beneath this is an undercarriage 












navigation impossible. 






choice of cross winds and tur- 




There is no sound in Fighter 


cross-sectional view of tour 




bulance, your pilot rating and 


this is the airspeed indicator 


Pilot and hardly any in Flight 






controls. 


which displays your speed in 




connected by steep slopes 






knots. Next comes the RDF 


crashl although 1 am sure most 


which can be used by pressing 




struments. from left to right, are 




users would rather sacrifice 


the 'up' or 'down' key, accor- 




as follows; radar and compass 


ment in your panel and shows 


audial effacts for the excellent 


ding to whether you wish 10 




which includes your compass 






travel uphill or downhill. To at- 




bearing and distance in relation 




The object of Fighter Pilot 








sent beacon. Below this there 








an enemy bomber, depending 


are three digital locks showing 


has been selectedl is to defend 


a few miles of your original star- 








the four airfields from destruc- 










tion by simultaneous enemy 


back to the start. If you succeed 




digital speedometer beneath 




bombers which, although of an 


in beating him he will tell you a 




which sits the flap extension in- 


craft. The altimeter comes next 




code which allows you to jump 




dicator. In the middle of the 


and this is a dial with two hands; 


capable of devastating effects 


to the next level, ol which there 




panel is the artificial horizon 


the longer giving the height in 


or. both the airfields and your 


are five. Although the gam? is 
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Starship Ca plain (you) for the 
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:ampbell systems for spectrum 48k 

Can YOUR Database 
Handle This? ^> 

PROFESSIONAL FILE MANAGEMENT, DATA RETRIEVAL AND PRESENTATION"' 
ANY ADDRESS LISTS. INVENTORY. CUSTOMER OR PERSONNEL I 

iMASTERFILE cflti! 

Microdrive commands included; 32.42 or 51 
characters per line!; 26 fields per record; 
Unrestricted number of records; 36 user defined 
Display/Print formats; FasI search & sort facilities; 
Around 32K of RAM available for data! 

NOW with IMF-PRINT and MASTERFILE version 09, 
you can format your data for a full width printer! 

Works with most popular printer interfaces. Fully variable report widths (over UM> columns) and 
lengths. Powerful numeric editing and column totals. Almost no reduction in space available lor 
■lata. Many more products available. Send SAEfor derails! 

MASTERFILE version 09 £15.00 *«^^ ™.«w /«-,;,„ 

MF-PRINT £ 6.95 ™^CAdd™,7o!^!i!S 

MASTERFILE with MF-PRINT £19.95 , '.'.'.T'tf, m mV'i-J-.lIli 




cs 



It's easy 

to complain 

about 

advertisements. 

J 

The Advertising Standards Authority.* 
If an advertisement is wrong, we're hereto put it right. 

A.S.A. Ltd, Brook Hnuse.Tornngton Place. London WC1E 7HN. 



I ZX80 COMPUTING I 



The 80 in 84 



Mike Hyams is one of many who still use the ZX80 and 
here he presents some valuable tips to all it's fans. 



. My name 
lo you mea 
■ard of me? 1 1 
eard of Tin 



bz er shoves a portan 



v then. The « 
id RAM CS. These i 



connected: on Ihe B1 it is tht 
RCM CS line. So what? Well, as 
you will see. it has an effect 01 
what hardware can be used. 



g Input/Output ports. An I/O 



it Because this article 
i bout interfacing ZX- 
:hZX-80's. It's about 

e, or neatly available, for 
he 4K ROM ZX 80. 

n most peoples eyes the 
■X-BOdisd when the '81 was 



point there were al 
O's in Britain al 
at the 65.000 in 



jt 50.000 
e USA and 



Mny people bothere. 
B-81 and the Spectru 
an "essential" hi 
a announced at I 
» were the printer ar 
its. the r 



. The 



independent compani 
e re fleeter) the quality of 
nclair's own. For example 
■peech. sound: joysticks, and 
-n on. The ZX-80, however, 
ly had a 1 6K RAM pack as its' 
tra. Revolutionary as it was 
sn. it hardly compensates the 
owner of today, who sees 
much lap-pow-boom going 

the nearest computer retailer 
imminent; if it hasn't happen- 
sd already. 

[ despair; for help, 
ind hardware, is at hand. I will 
' ' and sweeping 
ttatement. At least 50% of 



ZX-81 

ZX-80 There. I 



io 




ao 


print 






N/L- 


HFTER P.SHORT PRLJ5E THE 5CRE 










45 






FOR N- 1 TO lO 


■^5?. J*? 1 *" "PRESS NEW LJtNE TO CO 






1 10 


CL5 








PRINT "GET READY THEN PRESS 


1 30 






















POKE 1641S..O 


ISO 


INPUT Z* 




LET X 1 = PEEK ( 1S4 ld'j 
































PRINT "PRESS N,-l_ FOR RESULT 


aeo 


INPUT 2* 










33G 


IF Ml;999 THEN LET 2t=TLt(Z 




400 


CL5 


E" 


PRINT "FWEPB3E PERCTION TIM 




430 


PRINT M 2 .; " , " .; J.% .. " SECONDS " 



id it Anrf 
go.ngtog* 
tor a couple of 
i those of you 



RAM pack. If you co 
C rcuit diagrams of tf 



some are unavailable for use on 
the '80. They are used for the 
keyboard, cassette, and TV, 
but, fortunately for us, the same 

tunately because this means 
that any hardware designed for 
the I/O port on the 81 should 
work on the '80. 

"Aha", I hear you cry. And 
those of you still playing with 
figure one should come back for 
Revelation number two. TheZX 
printer is purely I/O ill 






the 4K ROM ZX-8 



. FBh, 
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I ZX80 COMPUTING 1 



i. For example to dump 



from 32.000 ( 
poke 32001 wit! 
then COPY the f 



'.orby pokeing 
is code is stored 



but unfortunately Maplins I/O p 

probably due to lack central heatin 

. ."No reason". It couldbewhat 

ivorth giving them a ing for. 



32K and 64K RAM [ 
should work with the aforemsrt I 
tioned connection. Quite 
you can poke a location gr 
than32767fromBASICI't 



1. RANDOMISE HSR 



are others still on sale. The Chat- 
terbox from William Stuart 
Systems is also I/O mapped (or it 
was last time I looked) as is the 
ZONX-81 from Bi-pak. These 
units, speech and sound re spec 
lively are still available, and 
could well extend your ZX-80 
beyond what you thought possi 
ble. There are others, such as 



DO NOT USE "NEW" 
RFTER RUNNING THIS 
PROGRHM 

S900 LET R*=" 161-?2ROOa.OC5E5RFSFD 
3FBET 1 DBFB87FflDE0e3OFSE5DF7fiFEOa9 
FH307H3S70e79a3FE7S2824E5CB27a76 
7a607CB14836F'CB 1 ISFRElJIFOSOSVRCB 1 
] 1F67DBFB 3 F30FB7CD3FB lOF 2E 1 18D5D 
BFB lP30FB7fl0ro3FB0 3 1CCB5B23B1C1 1 
520RR3E04DGFBC 1 C9 ' 
ggiO LET X =30000 

■39SO POKE X , CODE i R$» I 15 + CODE I TL$ 
(R*) > -O.T& 
9S30 LET X=X+1 
99d.O LET H$=TLiiTL$m*).i 
9S50 IF R*=-" THEN STOP 
9360 GO TO 3-320 



For I 



e Cheetah Sweet Talker, 
n afraid 1 haven't had timt 
>eck what type of mappin. 



erve to do it. What I refer lo i 
ne ROM CS connection. Fc 

on to the wind lyou foolsl her 
: the theory. 

The ROM CS pin must b 
onnected to track 23B. Tod 



in 20 of 



.eROMct 



lilnig i 



ranged. It appears that there is 
more than one ROM, although 
Ihere is obviously only one. The 
problem is thai Ihe '80 has been 



clue. The ZX-80 characler sat 
starts at 3584 (or 7x51 2) and 
the pointer is stored in register 
H : so if you can find the instruc- 
tion LD H.7 Ihen you're halfway 
there. The tesl is up to you 
(unless Ray gets lots of leters, in 
which case I may explain fur- 

Computing doesn't make you 
think.). 

We now know enough about 
the I/O port to say that ALL I/O 



ROM copy in it, then your s 
Unless you have connecte 
ROM CS track. This hard 



lions IN and OUT. After a series 
of finger stretching exercises 
you can gel to these in Spec- 






■ailable v 



the above products come sup- 
plied with instructions on how to 

effort to implement these if you 

could always ask a friend. 

While browsing through the 
ads, looking for things to hand 



vices and Camel Products. Even 
if you have moved onto another 
computer, the possibility of us- 
ing an old '80 to make your own 
ROMs' must interest a few of 

Other peripherals that usi 
the ROM CS track are the range 
from Memotech. These unit wil 



le ZX-80 is nc 
resting. If y 



study the effects of alcr. 
never got round to u 



ped. Remember, if it is memory 
mapped it will probably have a 
connection to the ROM CS line 



unit that should work is the 
keyboard. As it uses the I/O 
method it should be alright, but 
the legends on the keys will need 



it of software. 
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The Key to spectrum Machine Code Success. 



Wu will only buvone Machine Code Systemsobuy the best.the one the professionals use. 



NEW IMPROVED PROGRAMS 

ASSEMBLER 




.:* or ASCII 

5. SAVE .'LOAD/ 

VERIFY both thFlistmq.i'in 

' Machine Code to cissc-to 

MICRODRIVE/NETWORK. 

— , - , e from cassette or 
ito memory for very 

large programs f.-,isrornisc io ■no-;: Ct'nti onic«. 
jrinief interfaces, or RS2J2 (with interface 1) for 80 columr 
)r itout. FAST ASSEMBLY — 1k Of COCte in 7 second; 
Assembler Directive; — ORG, END, DEFB, DEFW. DEFM, EQU, 

3 and Centronics faciliti 

h48K machines) 



MICRODRIVE COMPATIBLE 

i MONITOR 







d programmer 



in and de-Dug — 

code programs, inspect and 
.liter nifrmorvconten" 1 - 

Hex or ASCII. Break poi 

ful '.r.-.ir.'er display. MOW 
WITH ^.INC.LE STEPPING 
through RAM or ROM. 
Disassemble any part 
memory, RAM <~~"" 









it converter, 
ozx 



printer or vI3Rs;t; itv tn 
interface Dor customise to 
r interfaces General memory 

Delete Fill and Move Ciiiwrsirifin memory wit ii the 

riaSKmachinesonlyltoglye 

'""'5 programming system 



£7.50 



ble from trie -SPECTRUM 
PICTURESQUE, 6" ' 




^p* ZX Spectrum and QL 
Microdrive 
Storage Box £5.95 




■ HOLDS 20 CARTRIDGES • DESIGNED TO MATCH 
. FULLY INTERLOCKING SPECTRUM AND QL 

■ CENTRE SECTION FOR 
INDEX CARDS 

Transform Ltd has now produced a smart new Storage Bi 
for the ZX Spectrum and QL 
The Transk 

It will hold 20 Microdrive cartridges (enough to stor 
megabytes of data!) 

The Microdrive Storage Bon is fully interlocking and ' 
you 10 expand your system with all the new programi 

you- oflice/study. 



WireBhrl 




Contacts worldwide — consult our club page! 



Mid Cornwall ZX 
Club 

Dear ZX Computing, 
Please give our 'ZX Com pi 
Club' a plug: 



Cornwall PL26 8JF. 
Tel: 0726 890473 

We meet Mondays and 
day, 7 to 9pm. 

Yours sincerely, 
Mike Richards. 

Blackburn 
Computer club 

Dear ZX Computing, 

the Blackburn Computer CI 



50p a 






ft you 



your 50p will be refunded in ex- 
change lor your subscripton. At 
present the subscriptions are: 
Juniors- £3per annum; Adults 
- E5 per annum; Family - £10 

tion is paid then there is nothing 
further to pay to attend normal 



M'-'i 



n20,t 



the members itself. 

details of' chairman Erick vai 
Dyck, Trefcentrum. Dappe 
heidspleih, 1 070 Anderlecht, I 
phone him (after 19 h. I on I0: 
76 76 22 3, or simply try it oi 
by attending a meeting on tr 
first or the third Thursday of tt 



In doing so, you i 
published, as vi 



reviews/programs/for sale 

The only thing we ask ii 

members I collectively) c 

group. I would appreciat; 



srely. 



s steadily Erick V 



eld every other Monday night, 
t 7.20 pm. at The Fernhurst 
lotel, Bolton Road, Ewood. At 



Yours sincerely, 
R. Mulder. 



Turkish delightl 



) myself, for aguipm 



through BBC, Atan. D-juu'' 
Spectrum. ZX81 and so 0" II 
you have a computer of any 
make — orarethinkii'Hu't>uy"it 



ment. If you don't war 
then there's usually th 
tunity to play a game or 



Feniscoules 

Te. 60033 or 281 27 

FLUSIB 

Dner ZX Computing, 

end already Nourishing Club is 

Smcia<r In Brussels I FLU SIB). 
Already about 25 members 



what the Club is i 
want anything e 
Club then all we : 



Our inter 
spects of hardware develop- 

3 robotics; software develop- 
tion to game programs and pro- 
Basic to Forth, Logo, Pascal, 

products, then we are most in- 



IBilicag Bilgisayar) 

Diinya Saglick Sok Operat Han 

41/1 1 Taksim/lstanbul 

Turkey 

Phone; 149 1643/144 5261 

Kempsey contact 

Dear ZX Computing, 
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BOOK REVIEWS 



Bookshelf 



Read all about it with Patrick Cain. 



m Expert Guide to 
:he spectrum 
- Mike James 
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OMNICALC HAS BEEN EXTENDED! 



run models set up on the original OMNICALC and c 



OMNICALC2 is priced al £14.95 

For existing owners of OMNICALC we are offering a special tr£ 
ig tape and manual and a remittance for £8.00 (£9 Europe £10 e 
e will despatch OMNICALC2 by return. Please note that this tri 
jctly through MICROSPHERE. 



i"ttg^fjH"$9' m $^i //"/"#/" MICROSPHERE COMPUTERS. 

I / //'—/N 1 -'— '/"/7/«T/\/- LONDOIiNI02LA ■ TELEPMC 



I SPECTRUM UTILITY I 



Keyboard masks 



A simple idea that takes a genius to invent. 
Enter J L Phillips of Dorset. 



Many Spectrum ow 
terfaced a joystid 
computer to enjoy f 



and sometimes irritating com- 
plication. 

There are keyboard overlays 
available, of course, which help 
in readily identifying the keys in 

e suffer from two disadvan- 






ill obviously at 



designed for use with the stan- 
dard Spectrum keyboard and 
not with the typewriter style 
keyboards in which many Spec- 
e eventaully 



:k reference to 1 



nics keyboard bi 
is applicable to 
I, the only varia: 



rough the lot)} 
msA,BandC. 
e then labelled 

posed key: 




3 - 





GRENADES 


J. z 


hhes 


LEFT BIGHT ■» _ 


»si 


- SBB 
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ZX81 PROGRAMS 



The IK 
Corral 

Getting a quart into a pint 
pot is easy compared to 
getting a program in 1K! 
A selection of the 
impossible 



Slalom 
Andrew Norton 



Adding macnine B , ™ m c ;,"hi?h ","55.X™ 
Mervm J eagle iS*™"™**.,™ 


<x C ^"^^rv 






^%yK 








A useful little program to turn thai you can economise when 




machine, but what is special is the printer paper around and re- 


\«i" 


Ifie routine to align the decimals, using it. 


■-■A ] mE\ 


'*' **y' 


1 REM "ADDING MACHINE" 




•*n ' . 5v . 


2 GOTO t,S 


mBS\T 


SSj 


3 LET B=0 


^8k\ri 


3t+ z 


6 IF E=0 THEN GOTO 21 

9 LET B=INT (LN (ABS E> /LN 1 


5 RAND ^UkL V'.J 


w 


B) 


10 LET S=0 ^fcltSji 


rW 


12 IF 1>ABS E AND ABS E>0 THEN 


20 LET T=0 ^UOJ 


ft ' 


LET B=0 


30 LET X = 14 '^ 


3* 


15 IF .1>ABS E AND ABS E>=1 TH 


40 LET Y=INT <RND*26 


EN LET B=-l 


50 'PRINT AT Z1,Y|"»— 


IB IF E<0 THEN LET B=B+I 


60 FOR N=l TO 11 




20 IF E*="" THEN LPRINT TAB 21 


70 GOSUB 400 




-B; "TOTAL" 


BB SCROLL 




21 IF E=INT E THEN LPRINT TAB 


9B SCROLL 




29-BjEs ".BB" 


IBB GOSUB 4BB 




23 IF E=INT E THEN RETURN 


110 NEXT N 




25 LET W=10*E-INT <<E*10>+.5) 


12B IF X=Y+1 THEN LET 


S=S+1 


27 IF -1E-S<W AND W<1E-B THEN 


130 LET T=T+1 




LPRINT TAB 28-B;E;"B" 


140 IF T=20 THEN GOTO 


300 


29 IF -1E-8<W AND W<1E-B THEN 


150 GOTO 40 




RETURN 


30B CLS 




31 LPRINT TAB 2B-B;E 


310 PRINT "SCORE " ; Sj 


OUT OF " 


33 RETURN 


iT; 




60 LET W=0 


320 STOP 




70 LET E=0 


400 PRINT AT 0,X 


" O 




80 LET T=0 


410 PRINT AT 1,X 


"JW. 




100 INPUT E* 


420 PRINT AT 2,X 


")■( 




120 IF E*="" THEN LET E=T 


430 PRINT AT 3,X 


">■< 




130 IF E*="" THEN GOSUB 3 


440 IF INKEY*="5" AND 


X>0 THEN 


140 LET E=VAL E* 


LET X=X-1 




150 LET T=T+E 


450 IF INKEY*="8" AND 


X<2B THEN 


200 GOSUB 3 


LET X=X+1 




300 GOTO 100 


460 RETURN 
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ZX81 PROGRAMS I 



Equations 
David Webber 




1 PRINT "(A*<X**B) 
>+(E*(X**F))=S" 

2 LET 11=1 

3 LET M=0 

4 FAST 

5 PRINT "A?" 
10 INPUT A 
15 PRINT "B?" 
20 INPUT B 
25 PRINT "C?" 
30 INPUT C 

35 PRINT "D?" 
40 INPUT D 
45 PRINT "E?" 
50 INPUT E 
55 PRINT "F?" 
60 INPUT F 
65 PRINT "S?" 

70 INPUT S 

71 GOTO 77 

75 LET N=N+M 

76 GOTO 80 
30 LET X=N 

90 LET T=<A*(X*«B) >+(C*(X**DJ ) 
+(E*(X*«F) ) 

100 LET U=<A*( (X+M)**B> )+<C*( (X 
+M)**D»>+(E»< (X+M)#*F) > 

110 IF T<=G AND U>=5 THEN GOTO 
124 

112 IF U-T>-. 000001 AND U-T<.00 
0001 THEN GOTO 140 

115 LET X=N+M 

116 GOTO 75 
12B LET M=M/10 
130 GOTO 80 

140 PRINT "X=":X 



60 PRINT B* 

70 PRINT AT PI-PI, PI-PI j VAL "4 

0"*X,"FREE" 

B0 LET N=VAL "28" 
90 LET C*=""+C*( TO VAL "27") 
150 IF RND<PI-INT PI*-X THEN LET 
C*(VAL "2")="1" 

160 PRINT AT VAL "9" ,PI-PIjC* 
170 LET N=N-(INKEY*="1") 
180 IF N=VAL "3" THEN GOTO VAL 

"500" 
190 PRINT AT VAL " 12" ,N-PI/PI j •' 



200 IF C*<N> 

HEN GOTO VAL 
210 GOTO VAL "90" 
500 LET X=X+.025 
520 GOTO VAL "70" 
600 PRINT AT VAL 

HR* 141;AT VAL "11 

AT VAL "1",N-PI/PI 
630 PRINT AT CODE 

"CAUGHT" 
640 INPUT D* 
650 CLS 
660 RUN 



AND B*(N>= 
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ZX81 PROGRAMS ] 



1 LET X=SGN PI 

2 LET S=NDT PI 

3 FDR I=NOT PI TD CODE "2" 
3 PRINT AT 2,IjCHR* 137 

6 NEXT I 
10 LET A*=" * # * 

20 LET A*=A*+A* 
30 LET A=NDT PI 
40 LET A=A+SBN PI 
43 PRINT AT X,10;" " 
50 IF A*=31 THEN GOTO 30 
60 IF X = l AND INK£Y*="0" THEN 
GOSUB 100 

70 IF X=0 THEN GOSUB 101 

80 PRINT AT 1,0|A*CA TO-A+31) 

S3 LET B=S+1 

90 PRINT AT X,10; 

95 IF PEEK <256»PEEK 19399+PEE 
K 1639B>=23 THEN GOTO 110 

96 PRINT "Y" 

97 GOTO 40 

100 LET Y=4 

101 LET Y-Y-l 

102 IF Y=0 THEN LET XM 

103 IF Y>0 THEN LET X=0 

104 RETURN 

110 PRINT "DEAD" 

120 PRINT AT 0,0J "SCORE: ";S 





5 LET W=VAL "10" 

10 LET D=VAL "3" 

15 FOR E=VAL "0" TO VAL "149" 

20 SCROLL 

25 PRINT AT VAL "19", INT (RND* 
VAL "8"); "00" 

30 PRINT AT VAL "0",D; 

33 IF. PEEK (PEEK VAL "16398"+V 
AL "2S6"*PEEK VAL " 16399" ) =CODE 
"0" THEN GOTD VAL "1000" 

36 PRINT VAL "0"jDj "H" 

40 LET D=D+<INKEY*="0">-lINKEY 
*="B") 

45 IF INKEY*="1" THEN SDSUB VA 
L "100" 

46 IF D>VAL "3" OR D<VAL "0" T 
HEN LET D=VAL "B" 

50 NEXT E 

51 PRINT AT CODE " + " .CODE, "";" 
TIME WARP" 

52 FOR S=VAL "0" TD VAL "30" 

53 SCROLL 

54 PRINT ". . + 

55 NEXT S 

56 CLS 

60 PRINT "YOU MADE IT" 

65 GOTO VAL "1010" 
100 FOR S=VAL "1" TO VAL "5" 
105 IF W<VAL "1" THEN RETURN 
110 PRINT AT S,D;"-" 
115 PRINT AT S,D; " " 
120 NEXT S 

125 LET W=W-1 

126 IF W<1 THEN PRINT "NO ENERG 
Y LEFT" 

130 RETURN 
1000 PRINT "»" 
1010 PRINT "SCORE=";E 
1020 PRINT "ENERGY LEFT="sW 
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I SPECTRUM REVIEWS! 



Ouicksoft 



Clive Smith lurks among some more 
unusual programs 



Rainy Day 
Cases computer 
Simulations 



Blockbuster 
Compusound 

Based an the TV serie; 




\As seen in the na tional press! 




ThePrizes: 

You could win £2,500 to be spent 
on adream holiday of your choice 
for you and your family! 
Second prize —a complete Canon 
portable video outfit worth £1 ,300. 
Third prize-a BBC Model B micro 
computer plus software worth £450. 
Fourth prize— Minolta X700 camera 
with a 50mrn lensand tlashgun. 
worth £280. 



How to 
enter: 

Jusi identify the twelve 
objects pictured 
opposite .. 
HINT--h L .A'qusSpei 





and write your (one-word) answers in the spaces provided on 
thecoupon For instance, if you think that numbers isa 
record, write record' in the space next to 9on thecoupon and 
so on. Then tell us in up to 20 words why MAGAZINES 
MAKE IDEAL HOLIDAY READING. Complete the coupon 
in BLOCK LETTERS, and send it to: DREAM HOLIDAY 
COMPETITION, Argus Specialist Publications Ltd., 
No 1 Golden Square, London W1R 3AB, to reach us no later 
than 31st December 1984. 



->■£-- 



The 12 objects are 



Magazines make ideal holiday reading because tuotoZOworHs) . . 



_AGE (it under 18).- 



NAME(BLOCKf.£rr£fl5.J__ 

ADDRESS, 

Send to DREAM HOLIDAY COMPETITION, Arrj us Specialist Publications. No 1 Golden Square. London W1R3AB~~ 



t PROGRAMMING TIPSI 



De-bugger 

Getting a program typed in is often only the 
start of your problems. Ed to the rescue. 
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I SOFTWARE REVIEWS g 



Apocalypse 
Expansion Kit vol.1 
Nova Maps. 
Red Shift £4.95 



™IS?II=5 



Mind Play 



Greg Turnbull looks at games of 
strategy and skill. 



• S. AFRICA 

Another land battle; could si 
port many player power zon 

• SE. ASIA 

A marvellous map; similar 



definitely my 
favourite of the I 

• ARTIC 

I polo. Only 201 
I needed (o win in 
' • GALACTIC 



feature significantly extends the 
useful life of the program. Red 
Shift say it is selling as well now, 

In all four programs the cen- 
tres are already distributed, and 
troops deployed for you. The 
players merely decided which 
empire of force they wish to 
assume then straight on with 
the play. Specifically the pro- 

• DECLINE AND FALL IOF 
ROMS 

Disease is the main change here. 
Although random its local ef- 



The quest for the 
Holy Crail. 
48K Spectrum, 
Dream Software 

This is a new graphic adventure 
game from an up-and-coming 
company; Dream Software. The 
current trend for flashy presen- 
tation packaging is continued. 
The instruction pamphlet (like 
the program itself] contains wit- 
ty notes and very few clues. 

forever to load; although the 



abounds with sue 

Eventually you r 
to reach Camelot c 



wrong tape by mistake. 
iside I was immediately 
•y the French gua'd. He 



deciding who wins a battle. 
* NAPOLEON'S CAMPAIGNS 
Generals are introduced here, 



Apocalypse 
historical 
scenarios, vol. 2 
Chapters 1 & 2. 
£4.95 each. 



very little to help you. 

The screen display is hi 
tally split Hobbit-style, 
scrolling pictures and text 






play is introduced. As in real life 
the generals when defeated. 

escape. No Nukes are allowed in 
these early period wargames. 

• WAR IN THE PACIFIC 

An airstrike option replaces the 
Nukes phase of the main pro- 
gram. Otherwise the rules are 
essentially the same. 

• 1984 

the new situations; and the 
most graphically effective. A 



The film buff s among you wilt 
recognise this as a reference 
from the hilarious "Monty 
Python and the Holy Grail." This 
appears to have been the in- 

therefore be at an advantage. 
For instance: Vou can die at the 
' e knights who say 



NIC'; 



..lil'Tlr 



il (Your fate can be 
quite gruesome at times! 

Ultimately you get frustrated 
with going through the early 
stages so often. The terminal 
boredom sets in; as dying is so 
easy, and happens very quickly. 
You merely get transported 
back to the start to try again. So 
for all its comic touches this pro- 
already out of data by to- 






The copying of a I 






le, causing you 
•-, Sorry Dream, 
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ZX COMPUTING 



Lineage: ai)p per word F^ ^^ 

Semi display: C9 00 per single column centimetre. Ring 
for information on series bookings /discounts 



01 - 437 0699 

Send your requirements to: 
JANE EDMUNDS 
ASP Ltd., 1 Golden Square, 
London W1 



SOFTWARE GAMES 



SPECTRUM SOFTWARE CLUB 




THE BIZ! ThH i 

:■!.!> ;;* if.-..,- 
!.'.'i M lf( ijdcs postage, p 



CURRENT SPECTRUM PROGRAMS 

Tradewind (£5 Cassette. £9.50 Microdrive) 



Jersey Quest (tTcassetle, SVo" Microdrive) 



Jtor (£4 Cassette. £8 50 Microdrive) 



nsmmszmm 



'SPECTRUM SYNTHESISER" - 



HOME ENTERTAINMENTS 

SPECTRUM SOFTWARE - presents 2 great games! 



HOME ENTERTAINMENTS TAPE EXCHANGE CLUB? 

Cheques/POs to; 

HOME ENTERTAINMENTS 

6 Hampton Road, Blackpool FY4 1JFJ 



SPECTRUM 48K 



n I . , ,i fi.,. I ,'..".[ . ■■ ,■. .v. , , ,1.1 . 



■:.!Lil!rjA. 
onolMONTHLYBALAI 



SPECTRUM 
48K 

MOVIE-MAKING 
ANIMATION & MUSIC 

Prog. £7 incl. 

W.'^SE-OODE READING 



SICK OF -BLASTING 
GAMES?" 
H POINTLESS 



" GAMES?"" 
Then use 'Treasure Hurl 



G. W. Comporn 

SO Oakt.ee La 

Manslield. 

Notts NG18 31 
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SOFTWARE APPLICATIONS 



Pools Prediction 






TF10 7SE.Tel:(O9S3)ai331E 



;>'■!- 



ZCA 29 Ciado'e'tor' [ 



lype ol insulation icr you' hi,". e 

Compiina. DectZX, IBHeywood 
Boad.Gt SuSIO'l.S WirralL66 3PFl 

BAR C HARTS rriaoe easy on your 

■IfiK Sll.'Clrurr- wt'l ; : ;.,:., A;.:: 



E3 50 Send cheque/PC 
Patlman. 5 Mounicfa 
ton NN3 3DG. 



QL UTILITIES 



W □ SOFTWARE 



E5 



READING AND 

SPELLING 

PROBLEMS? 

THEY END HERE 

For any ZX Spectrum: 

WORDS and LETTERS 

* Moving Graphics 

* Words Changeable 





SPECTRUM 48K 



E295 :.-Rheral 

I .' i .' '5 SLR Photography ft 

-■■■■■: EZ.96 SpBI G ■ :■ I - 1 - r -.. 

. i'ilrri;., ..ici f7 f.iC r. 



SPECTRUM ZX: 
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MICRODRIVE ONE (MDI) 



■-..-■■ : .}, . 



e without 7 program im:-*.*;'; ~C5 (CroOi 
er etc. Gels I hem funning. I 



MICRO COMPUTER 
AUCTIONS 



Send for entry form or next catalogue to: 

MICRO COMPUTER AUCTIONS (ZX) 

Northingtort House, 
59 Grays Inn Road, London WC1X BTL. 

TEL: 01 - 242 0012 (24 hours) 







OI-H-57-OS26 











H," 


™ U andV.mtiTo* 


0WM1 








mm! 


Cgon'sV^u^ 


IZ7M 










































































""ex 


3 W. Tel: (D2UB) 


™" 



SPECTRUM OWNERS 



X. Lent Software. 

9 Chsvlan. Hlghtleld. 

Hemel Hempilnd HP2 5BD 





AD INDEX 




Addictive Games 

AGF 

Argus Press Software 

Avalon 

Boelm AW 

Brother Industries 
Buffer Micro Shop 
Campbell Systems,. 

Commodore 

Currah 

Durrell Software 

Electrical Software 

File Sixty.. 


54 

12 

26. 30. 147 

124 

106 

31 

122 

128 

27 

22,23 

51 

2 

19 

106 

117 


Oasis Software 


63 


Picturesque 

The Program Bureau 

P.V. Tubes 


131 

124 

.114 


Romantic Robot 

Skywave ..... 

Sotteach 

Software Farm 

Software Supermarket 

Spectrum Games 

Statacom 

Shiva 

SMT 

Trade & Tech 


78 

59 

48 

82 

55 

3 

00 

85 

124 

OBC 
6 


Interface 

Kuma Computers 

McGraw Hlllorook 


135 

42 

122 


University Software 

Wizard Software 


131 

106 

78 


Microsphere 


135 
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CURRAH USPEECH 





ch Synthesiser f 



The CURRAH ^SPEECH is ready to talk immediately on 
power-up. has an infinite vocabulary and outputs speech 
and ZX Spectrum sound through your TV speaker There 
is no software to load with ^SPEECH — sophisticated 
Gate Array technology means you can just plug in and 
start constructing words and sentences like litis: 
LETSS = ipfee|k (nn )|oo| jeeJvH" will say "speak no 
evil"' Furrher commands control the "voicing" of keys as 
they are pressed, and an intonation facility allows you to 
add expression to the speech 

jiSPEECM is fully compatible with ZX Interface I and 
may be used with the CURRAH >j.SLOT Expandable 
Motherboard, allowing easy expansion of your ZX 
system. ^SPEECH and jiSLOT will also be compatible 
with the CURRAH ^SOURCE unit when it arrives later 
this year, allowing you to write Assembler and FORTH 
statements directly into your BASIC programs! 
Top selling games like ULTJfvWE'S Lunar Jetman 
feature ^.SPEECH voice output — watch out for other 
titles from Bug-Byte. CDS. Ocean. Quicksilva and PSS. 



^SPEECH is available from''' 
WOOLU/OPTHS. GREENS - BOOTS. JOHN MENZJES. 
SPECTRUM STORES and good dealers nationwide — 
or use rhe form to Older the CURRAH ^SPEECH — 

winner of the CTA 'Product c" 

iramr 



I Se*uiatthePCW» 




How much would 
you expect to pay for a 
dual 128K fast access 
storage system for 
your Spectrum that 
included Centronics 
and RS232 interfaces 
andfreeword pro- 
cessing software as 
standard? 

Chances are it's a lot more 
than £129.95. Bui ihis is what 
will buy you the incredible 
Rotroriics Wa fa drive unit. 

includes VAT and postage. 




ItOTItOMKS WAFADfilVE 



A fast reliable dual- 



drive stora ge system 



Integrated System 



TheWaladriveisa 
complete system which 
contains the micro interlace, 
two 128K drives. RS232 and 
Centronics ports, all in one 
attractively-styled, compact 
unit. There is a minimum ot 
connecting leads and no eiira 
boxestoclutterthedesktop. 
Like the majority ot profes- 
sional systems, the units are 
dual drive. This otters the opti- 
mum balance between system 
f leii bility a nd cost . Built-in 
serial and parallel interfaces 



just about any popular printer. 
Fast and Reliable 

TheWafadriveachieves 
very fast loading and saving. 

reliability. Extensive research 
and the use of high grade 
materials ensure that the 
Wa tad rive will give years of 
dependable operat ion. Data 



integrity is on a par with 
floppy disk. The fully inter- 
changeable wafers are avail- 
able in three sizes - 1 2BK, 64K 
and 16K. Low capacity wafers 
give faster access. They are 
therefore most suitable for 
program development 
applications. The high 
capacity wafers are suitable 
for more general datastorage. 
Loading r ' 



times as last as cassette! 



use your Waf adrive straight 
away. There is also a rapidly 
growing range of software to 
enable the progr 



ga mes playe r to exploit the 
Waladrive system to Ihe full. 

Wafadrlveforthel6/48K 
Spectrum is available now. 
Versions for other popular 
home computers are under 
development. 

Send a1Gp stamp for a full 
colour brochure and 
information on software and 



■ J.I:II||*"J.J:>J!UI,!!.W1I.I'J.'..J.|I'" 



qs 



sii/rf 



